情节随机性

问题描述

| 我正在寻找有关从R中的一个零序列生成此图的帮助。我将其用作一系列测试之一,以研究一个序列是否随机(通过查找噪声中的模式)。 注意:这不是作业! 例如。,
> y <- rnorm(3000,1,2)
> plot(y)
>plot(y~y)
我的数据是这样的:
 >str(hv10k)
 num [1:100000] 0 1 1 1 0 0 1 0 0 0 ...
更新: 遵循@RomanLuštrik的建议,这是我到目前为止的内容: 700次抛硬币: 100,000抛硬币:     

解决方法

        一种方法是
side <- 100
my.zero <- matrix(sample(c(0,1),side^2,replace = TRUE),side)
image(my.zero)
编辑 您可以在
sample
中使用
prob
参数。
side <- 100
my.zero <- matrix(sample(c(0,replace = TRUE,prob = c(0.8,2)),side)
image(my.zero)
编辑2
y <- rnorm(10000,1,2)
y <- matrix(ifelse(y > 0,0),ncol = 100)
image(y,col = c(\"white\",\"black\"))