订购具有列名索引作为列号的数据帧

Question

我可以轻松订购这样的数据框：

df<-data.frame(a=c(1,2,5,7,2),b=(1:5))
# indexing by column name, works
df2<-df[with(df,order(a)),]

但是如何通过索引列号来实现相同的目标呢？

# indexing with column number, attemps failed
df2<-df[with(df,order(colnames(df[1]))),]
df2<-df[with(df,order(deparse(colnames(df[1])))),]
df2<-df[with(df,order(paste(colnames(df[1])))),]
df2<-df[with(df,order(paste(deparse(colnames(df[1]))))),]

Answer 1

喜欢这个吗？

df2 <- df[order(df[,1]),]

如果您使用with，则无法使用列号。