如何在R中查找频率数据的方差?
如果我们有频率数据,那么我们首先需要通过重复每个值对应的频率来找到总数据或完整数据,然后我们可以对这些完整数据应用 var 函数。
例如,如果我们有一个名为 df 的数据框,它包含两列,例如 X 和频率,那么我们可以使用下面给出的命令找到总数据:
Total_data<-rep(X,Frequency)
现在,中位数将通过使用如下命令找到:
var(Total_data)
示例 1
以下代码片段创建了一个示例数据框:
x<-rpois(20,20) frequency<-sample(1:10,20,replace=TRUE) df1<-data.frame(x,frequency) df1
创建了以下数据框
x frequency 1 11 3 2 15 9 3 23 2 4 16 3 5 16 4 6 17 10 7 19 6 8 23 9 9 15 6 10 22 4 11 21 5 12 18 10 13 21 3 14 27 1 15 16 5 16 27 5 17 19 8 18 23 5 19 19 3 20 16 8
为了在上面创建的数据框 df1 上找到总数据,请将以下代码添加到上述代码片段中:
x<-rpois(20,20) frequency<-sample(1:10,20,replace=TRUE) df1<-data.frame(x,frequency) Total_data1<-rep(x,frequency) Total_data1
输出
如果您将上面给出的所有代码片段作为单个程序执行,它将生成以下输出:
[1] 11 11 11 15 15 15 15 15 15 15 15 15 23 23 16 16 16 16 16 16 16 17 17 17 17 [26] 17 17 17 17 17 17 19 19 19 19 19 19 23 23 23 23 23 23 23 23 23 15 15 15 15 [51] 15 15 22 22 22 22 21 21 21 21 21 18 18 18 18 18 18 18 18 18 18 21 21 21 27 [76] 16 16 16 16 16 27 27 27 27 27 19 19 19 19 19 19 19 19 23 23 23 23 23 19 19 [101] 19 16 16 16 16 16 16 16 16
为了在上面创建的数据框上查找 Total_data1 的方差,请将以下代码添加到上述代码片段中:
x<-rpois(20,20) frequency<-sample(1:10,20,replace=TRUE) df1<-data.frame(x,frequency) Total_data1<-rep(x,frequency) var(Total_data1)
输出
如果您将上面给出的所有代码片段作为单个程序执行,它将生成以下输出:
[1] 12.58699
示例 2
以下代码片段创建了一个示例数据框:
y<-rpois(20,20) count<-sample(1:10,20,replace=TRUE) df2<-data.frame(y,count) df2
创建了以下数据框
y count 1 25 2 2 14 2 3 13 8 4 22 6 5 18 1 6 30 9 7 22 9 8 26 1 9 23 3 10 20 2 11 17 2 12 12 5 13 20 3 14 12 8 15 20 1 16 11 7 17 19 3 18 13 3 19 17 8 20 15 8
为了在上面创建的数据框 df2 上找到总数据,请将以下代码添加到上述代码片段中:
y<-rpois(20,20) count<-sample(1:10,20,replace=TRUE) df2<-data.frame(y,count) Total_data2<-rep(y,count) Total_data2
输出
如果您将上面给出的所有代码片段作为单个程序执行,它将生成以下输出:
[1] 25 25 14 14 13 13 13 13 13 13 13 13 22 22 22 22 22 22 18 30 30 30 30 30 30 [26] 30 30 30 22 22 22 22 22 22 22 22 22 26 23 23 23 20 20 17 17 12 12 12 12 12 [51] 20 20 20 12 12 12 12 12 12 12 12 20 11 11 11 11 11 11 11 19 19 19 13 13 13 [76] 17 17 17 17 17 17 17 17 15 15 15 15 15 15 15 15
为了在上面创建的数据框上查找 Total_data2 的方差,请将以下代码添加到上述代码片段中:
y<-rpois(20,20) count<-sample(1:10,20,replace=TRUE) df2<-data.frame(y,count) Total_data2<-rep(y,count) var(Total_data2)
输出
如果您将上面给出的所有代码片段作为单个程序执行,它将生成以下输出:
[1] 33.33138
示例 3
以下代码片段创建了一个示例数据框:
z<-sample(1:2,20,replace=TRUE) count<-sample(1:10,20,replace=TRUE) df3<-data.frame(z,count) df3
创建了以下数据框
z count 1 1 8 2 1 1 3 1 3 4 1 5 5 1 3 6 2 5 7 2 6 8 1 1 9 1 10 10 2 10 11 2 6 12 2 7 13 2 1 14 1 5 15 1 4 16 1 1 17 2 2 18 1 5 19 2 2 20 2 6
为了在上面创建的数据框 df3 上找到总数据,请将以下代码添加到上述代码片段中:
z<-sample(1:2,20,replace=TRUE) count<-sample(1:10,20,replace=TRUE) df3<-data.frame(z,count) Total_data3<-rep(z,count) Total_data3
输出
如果您将上面给出的所有代码片段作为单个程序执行,它将生成以下输出:
[1] 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 2 2 2 2 2 2 2 2 2 2 2 1 1 1 1 1 1 1 [39] 1 1 1 1 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 1 1 1 1 1 1 1 1 1 1 [77] 2 2 1 1 1 1 1 2 2 2 2 2 2 2 2
为了在上面创建的数据框上查找 Total_data3 的方差,请将以下代码添加到上述代码片段中:
z<-sample(1:2,20,replace=TRUE) count<-sample(1:10,20,replace=TRUE) df3<-data.frame(z,count) Total_data3<-rep(z,count) var(Total_data3)
输出
如果您将上面给出的所有代码片段作为单个程序执行,它将生成以下输出:
[1] 0.2527473
广告
数据结构
网络
关系型数据库管理系统
操作系统
Java
iOS
HTML
CSS
Android
Python
C语言编程
C++
C#
MongoDB
MySQL
Javascript
PHP