首页 > 解决方案 > 计算0到1之间的波动次数

问题描述

我有一个 1 和 0 的随机序列,大约 51 个值,我想计算“正面和反面”之间的波动次数。具体来说,我有 27 个 0 和 24 的 1 值,我想知道 0 和 1 之间的波动次数。我只能通过以下代码获得 0 和 1 的数量:

coin.tosses[coin.tosses==0]

coin.tosses[coin.tosses==1]

谢谢您的帮助

标签: r

解决方案


您可以将绝对差值相加等于一:

coin.tosses <- sample(c(0, 1), 51, replace = TRUE)
sum(abs(diff(coin.tosses)) == 1)

如果您只想计算头尾或倒数,请删除abs并检查是否等于 1 或 -1


推荐阅读