在 R 数据框列中查找小于等于阈值的连续出现频率?
要在 R 数据框列中找到小于阈值的连续出现频率,我们可以使用 rle 函数和 sum 函数。
查看下面给出的示例以了解如何完成。
示例 1
以下代码段创建了一个示例数据框 -
x<-round(rnorm(20,1,2.5),0)df1<-data.frame(x)df1
创建以下数据框 -
x1 12 43 -24 -35 -36 -47 38 -49 210 111 412 213 114 -115 416 -417 118 -119 -220 -1
要在 x 列中找到小于 1 的成功发生频率,请将以下代码添加到上述代码段中 -
x<-round(rnorm(20,1,2.5),0) df1<-data.frame(x) sum(rle(df1$x<=1)$values)
输出结果
如果您将上述所有给定的片段作为单个程序执行,它会生成以下输出 -
[1] 6
示例 2
以下代码段创建了一个示例数据框 -
y<-round(rnorm(20,5,10),0)df2<-data.frame(y)df2
创建以下数据框 -
y1 222 43 54 185 166 187 38 -49 2210 811 512 613 -1114 -715 -416 717 1818 1119 -620 -9
要在 y 列中找到小于 5 的成功发生频率,请将以下代码添加到上述代码段中 -
y<-round(rnorm(20,5,10),0) df2<-data.frame(y) sum(rle(df2$y<=5)$values)
输出结果
如果您将上述所有给定的片段作为单个程序执行,它会生成以下输出 -
[1] 5
示例 3
以下代码段创建了一个示例数据框 -
z<-sample(0:5,20,replace=TRUE)df3<-data.frame(z) df3
创建以下数据框 -
z1 22 43 34 55 46 27 38 29 010 311 412 013 414 315 316 017 318 319 320 3
要在 z 列中找到小于 4 的成功发生频率,请将以下代码添加到上述代码段中 -
z<-sample(0:5,20,replace=TRUE) df3<-data.frame(z) sum(rle(df3$z<=4)$values)
输出结果
如果您将上述所有给定的片段作为单个程序执行,它会生成以下输出 -
[1] 2