我有一个包含数字和非数字列的数据框,比方说 df <- data.frame(v1=1:20,v2=1:20,v3=1:20,v4=letters[1:20],v5=letters[1:20
... . . 我有一个包含数字和非数字列的数据框,比方说
df <- data.frame(v1=1:20,v2=1:20,v3=1:20,v4=letters[1:20],v5=letters[1:20])
要仅选择我将使用的非数字列
fixCol <- !sapply(df,is.numeric)
但现在我还想要包含一个特定的数字列,比如说v2.我的数据框非常大,列的顺序发生了变化,因此我无法使用数字对其进行索引,我真的想使用名称“v2”.我试过了
fixCol$v2 = TRUE
但是这给了我警告在fixCol $FR = TRUE：将LHS强制转换为一个列表,这使得我无法将原始数据框子集化为仅获得fixCol
df[,fixCol]
给出：.subset(x,j)中的错误：无效的下标类型’list’
最后,我的目标是缩放我的数据框的所有数字列,除了这一个指定的列,使用类似的东西
scaleCol = !fixColdf_scaled = cbind(df[,fixCol],sapply(df[,scaleCol],scale))
我该怎么做才能做到最好？
.解决方法
. 我们可以使用OR条件(|)来获取逻辑索引,然后对’df’的列进行子集化.
df1 <- df[!sapply(df,is.numeric)|names(df)=='v2']head(df1,2)# v2 v4 v5#1 1 a a#2 2 b b. . .. ...
