为了找到R数据框列的模型,我们可以创建一个函数并将其用于计算。模式的功能如下创建:
mode<-function(x){which.max(tabulate(x))}
对于具有数字列x的称为df的数据帧,此函数将用作mode(df $x)。
考虑以下数据帧-
ID<-1:20 x<-rpois(20,2) df1<-data.frame(ID,x) df1输出结果
ID x 1 1 1 2 2 2 3 3 3 4 4 1 5 5 1 6 6 0 7 7 2 8 8 0 9 9 1 10 10 2 11 11 5 12 12 1 13 13 2 14 14 2 15 15 2 16 16 3 17 17 2 18 18 1 19 19 6 20 20 1
求x的众数-
模式(df1 $x)
[1] 1
S.no<-1:20 y<-rpois(20,10) df2<-data.frame(S.no,y) df2输出结果
S.noy 1 1 12 2 2 13 3 3 11 4 4 7 5 5 6 6 6 5 7 7 8 8 8 13 9 9 6 10 10 8 11 11 12 12 12 7 13 13 15 14 14 6 15 15 13 16 16 14 17 17 10 18 18 11 19 19 7 20 20 14
求y的众数-
模式(df2 $y)
[1] 6