r - 计算硬币翻转序列中的交替次数

标签 r simulation coin-flipping

我有一个 1 和 0 的序列,我想计算交替的次数。例如

x <- rbinom(10, 1, 1/2)
> x
 [1] 0 0 1 1 1 1 1 0 1 0

因此,我想(在 R 中)计算序列从 1 到 0 交替(或翻转)的次数。在上面的序列中,交替的次数(用手数)是 4。

最佳答案

您可以使用 diff() :

> x <- rbinom(10,1,1/2)

> x
 [1] 0 0 0 1 1 1 1 0 1 0

> sum(diff(x)!=0)
[1] 4

关于r - 计算硬币翻转序列中的交替次数,我们在Stack Overflow上找到一个类似的问题: https://stackoverflow.com/questions/3666969/

相关文章:

r - 在 R 中合并多个数据帧

c++ - c++ 绘图包

python - 迭代性能

c++ - 在C++中模拟抛硬币时,模如何工作?

function - R 的 "%in%"对于 Stata 的等效函数

r - 确定脚本是否在 RStudio 笔记本中运行

r - 如何使用 R 中的动画构建 Shiny 的应用程序?

simulation - 有没有可以模拟不稳定网络连接的程序?

simulation - 将多个 FMU 合二为一

C++ 在另一个函数中调用函数