如何从 R 数据框中的每行的序列中删除重复项？

要从 R 数据框中的每行的序列中删除重复项，我们可以按照以下步骤进行操作 -

• 创建一个数据框。
• 删除数据框行中的重复序列

创建数据框

让我们创建一个如下所示的数据框 -

 实时演示

x1<-rpois(20,1)
x2<-rpois(20,1)
x3<-rpois(20,1)
x4<-rpois(20,1)
df<-data.frame(x1,x2,x3,x4)
df

执行上述脚本后，将生成以下输出（此输出会因您的系统随机性而有所不同） -

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

删除数据框行中的重复序列

使用 apply 函数和 rle 函数删除 df 行中的重复项 -

 实时演示

x1<-rpois(20,1)
x2<-rpois(20,1)
x3<-rpois(20,1)
x4<-rpois(20,1)
df<-data.frame(x1,x2,x3,x4)
apply(df,1,FUN=function(x) rle(x)$values)

输出

[[1]]
x1 x3 x4
0  1   0

[[2]]
x4
0

[[3]]
x1 x2 x4
 0 1  2

[[4]]
x1 x3 x4
3  1  0

[[5]]
x1 x3 x4
0  1  2

[[6]]
x1 x2 x3 x4
0  1  0  1

[[7]]
x1 x2 x4
1  0  1

[[8]]
x3 x4
 0 1

[[9]]
x3 x4
 0 2

[[10]]
x1 x3 x4
2  0  1

[[11]]
x3 x4
0  3

[[12]]
x1 x3 x4
0  1  2

[[13]]
x1 x2 x3 x4
0  3  2  0

[[14]]
x1 x2 x3 x4
2  1  0  2

[[15]]
x3 x4
0  1

[[16]]
x3 x4
0  3

[[17]]
x2 x3 x4
1  2  0

[[18]]
x1 x4
1  0

[[19]]
x1 x2 x3 x4
1  0 1 3

[[20]]
x2 x3 x4
0 2 1

Nizamuddin Siddiqui

更新于： 2021 年 8 月 13 日

132 次浏览

开启你的 职业生涯

完成课程获得认证

立即开始