如何将R数据帧的列转换为行？
如果将行值错误地记录到列中，那么我们可能希望将列转换成行。因此，要将R数据帧的列转换为行，我们可以使用转置函数t。例如，如果我们有一个包含五列五行的数据帧df，则可以使用as.data.frame（t(df)）将df的列转换为行。
示例
set.seed(4) x1<-rnorm(5,10,2) x2<-letters[1:5] x3<-1:5 df1<-data.frame(x1,x2,x3) df1
输出结果
x1 x2 x3 1 10.433510 a 1 2 8.915015 b 2 3 11.782289 c 3 4 11.191961 d 4 5 13.271236 e 5
将df1的列转换为行-
示例
df1_new<-as.data.frame(t(df1)) df1_new
输出结果
V1 V2 V3 V4 V5 x1 10.433510 8.915015 11.782289 11.191961 13.271236 x2 a b c d e x3 1 2 3 4 5
示例
a<-sample(0:1,20,replace=TRUE) b<-sample(0:5,20,replace=TRUE) c<-sample(1:10,20,replace=TRUE) d<-sample(6:10,20,replace=TRUE) df2<-data.frame(a,b,c,d) df2
输出结果
a b c d 1 0 3 5 10 2 1 4 9 10 3 1 4 2 9 4 1 5 10 7 5 1 4 4 6 6 1 0 8 6 7 1 5 10 9 8 0 2 2 6 9 1 5 10 9 10 0 4 6 9 11 0 3 10 9 12 0 0 6 10 13 0 3 1 10 14 0 5 4 7 15 1 2 2 10 16 1 4 4 10 17 0 3 3 8 18 0 3 1 7 19 1 5 7 9 20 1 5 7 7
将df2的列转换为行-
示例
df2_new<-as.data.frame(t(df2)) df2_new
输出结果
V1 V2 V3 V4 V5 V6 V7 V8 V9 V10 V11 V12 V13 V14 V15 V16 V17 V18 V19 V20 a 0 1 1 1 1 1 1 0 1 0 0 0 0 0 1 1 0 0 1 1 b 3 4 4 5 4 0 5 2 5 4 3 0 3 5 2 4 3 3 5 5 c 5 9 2 10 4 8 10 2 10 6 10 6 1 4 2 4 3 1 7 7 d 10 10 9 7 6 6 9 6 9 9 9 10 10 7 10 10 8 7 9 7
示例
y1<-LETTERS[1:20] y2<-letters[1:20] y3<-sample(LETTERS[1:4],20,replace=TRUE) df3<-data.frame(y1,y2,y3) df3
输出结果
y1 y2 y3 1 A a A 2 B b A 3 C c D 4 D d C 5 E e C 6 F f B 7 G g A 8 H h C 9 I i B 10 J j A 11 K k A 12 L l C 13 M m C 14 N n A 15 O o A 16 P p C 17 Q q D 18 R r D 19 S s D 20 T t D
将df3的列转换为行-
示例
df3_new<-as.data.frame(t(df3)) df3_new
输出结果
V1 V2 V3 V4 V5 V6 V7 V8 V9 V10 V11 V12 V13 V14 V15 V16 V17 V18 V19 V20 y1 A B C D E F G H I J K L M N O P Q R S T y2 a b c d e f g h i j k l m n o p q r s t y3 A A D C C B A C B A A C C A A C D D D D
示例
z1<-rpois(20,10) z2<-rpois(20,5) z3<-rpois(20,8) z4<-rpois(20,4) df4<-data.frame(z1,z2,z3,z4) df4
输出结果
z1 z2 z3 z4 1 10 11 13 2 2 8 3 9 2 3 6 4 10 3 4 16 6 10 4 5 9 7 5 8 6 4 5 5 3 7 7 4 3 2 8 8 2 9 3 9 12 6 9 4 10 15 7 9 3 11 8 5 10 2 12 20 4 6 4 13 5 4 10 8 14 10 2 8 1 15 20 5 9 3 16 5 5 8 5 17 13 5 8 6 18 7 1 14 3 19 12 2 9 6 20 9 8 11 2
将df4的列转换为行-
示例
df4_new<-as.data.frame(t(df4)) df4_new
输出结果
V1 V2 V3 V4 V5 V6 V7 V8 V9 V10 V11 V12 V13 V14 V15 V16 V17 V18 V19 V20 z1 10 8 6 16 9 4 7 8 12 15 8 20 5 10 20 5 13 7 12 9 z2 11 3 4 6 7 5 4 2 6 7 5 4 4 2 5 5 5 1 2 8 z3 13 9 10 10 5 5 3 9 9 9 10 6 10 8 9 8 8 14 9 11 z4 2 2 3 4 8 3 2 3 4 3 2 4 8 1 3 5 6 3 6 2