如何找到R数据帧的最小行数？

数据分析是一项艰巨的任务，因为在大型项目的较小目标方面，数据分析存在很大差异。最小的任务之一可能是找到数据帧中每一行的最小值。为此，我们可以使用apply函数并将FUN参数作为min传递，以便获得最小值。

请看以下数据帧-

示例

set.seed(101)
x1<-rpois(20,1)
x2<-rpois(20,2)
x3<-rpois(20,5)
df1<-data.frame(x1,x2,x3)
df1

输出结果

  x1 x2 x3
1 1 3 4
2 0 5 5
3 1 1 6
4 1 2 4
5 0 4 4
6 0 3 3
7 1 0 2
8 0 1 8
9 1 2 7
10 1 2 2
11 2 2 2
12 1 1 4
13 1 1 6
14 3 1 6
15 1 2 5
16 1 4 7
17 2 1 6
18 0 3 5
19 1 0 6
20 0 4 5

为每一行的最小值创建一个新的列Min-

示例

df1$Min<-apply(df1,1,FUN=min)
df1

输出结果

x1 x2 x3 Min
1 1 3 4 1
2 0 5 5 0
3 1 1 6 1
4 1 2 4 1
5 0 4 4 0
6 0 3 3 0
7 1 0 2 0
8 0 1 8 0
9 1 2 7 1
10 1 2 2 1
11 2 2 2 2
12 1 1 4 1
13 1 1 6 1
14 3 1 6 1
15 1 2 5 1
16 1 4 7 1
17 2 1 6 1
18 0 3 5 0
19 1 0 6 0
20 0 4 5 0

让我们看另一个例子-

示例

y1<-sample(0:9,20,replace=TRUE)
y2<-sample(0:9,20,replace=TRUE)
y3<-sample(0:9,20,replace=TRUE)
y4<-sample(0:9,20,replace=TRUE)
df2<-data.frame(y1,y2,y3,y4)
df2

输出结果

  y1 y2 y3 y4
1  7  2 6 1
2  9  5 4 6
3  9  7 5 0
4  6  5 0 8
5  2  4 7 1
6  1  7 9 1
7  3  2 0 4
8  3  3 3 6
9  5  9 3 7
10 4  3 1 2
11 7  1 7 8
12 5  8 2 5
13 1  0 4 2
14 5 0 7 8
15 0 2 6 5
16 7 4 4 5
17 3 5 7 9
18 5 8 1 4
19 5 0 9 1
20 3 1 3 1

创建一个新列最小为每行的最小值-

示例

df2$Minimum<-apply(df2,1,FUN=min)
df2

输出结果

  y1 y2 y3 y4 Minimum
1  8  9  9  3 3
2  4  4  6  5 4
3  0  1  8  2 0
4  2  8  8  4 2
5  9  1  8  6 1
6  8  4  4  1 1
7  2  2  1  3 1
8  9  8  6  3 3
9  3  9  8  8 3
10 1  6  9  8 1
11 0  3  4  2 0
12 5  0 7 6 0
13 8  7  4 7 4
14 1  3  5 2 1
15 1  7  8 1 1
16 0  9  5 5 0
17 5  9  8 0 0
18 5  3  2 3 2
19 1  3  9 7 1
20 8  2  6 2 2