我是一个新手R程序员。我想知道如何在数据文件上轻拍,但避免使用某些列。
# Some dummy dataframe
df <- data.frame(
         grp = c("A", "B", "C", "D"),
         trial = as.factor(c(1,1,2,2)),
         mean = as.factor(c(44,33,22,11)),
         sd = as.factor(c(3,4,1,.5)))
df <- lapply(df, function (x) {as.numeric(as.character(x))})但是,我使用的方法是通过强制引入NAs。
在保持数据完整性的同时,会有选择地(或取消选择地)对数据文件进行lapply吗?
换句话说,会否有一种方法只将均值和sd转换为数字?(一般形式)
谢谢
发布于 2017-04-10 03:11:54
尝试这样做:
df[,3:4] <- lapply(df[,3:4], function (x) {as.numeric(as.character(x))})您只是将函数传递给指定的列。您还可以提供一个条件来选择列的子集,比如排除不想转换的列。
col = names(df)[names(df)!=c("grp","trial")]
df[,col] <- lapply(df[,col], function (x) {as.numeric(as.character(x))})发布于 2017-04-10 03:11:43
正如你可能已经猜到的,有很多种方法。因为您似乎在执行就地替换,所以实际上,for循环是合适的。
df <- data.frame(
         grp = c("A", "B", "C", "D"),
         trial = as.factor(c(1,1,2,2)),
         mean = as.factor(c(44,33,22,11)),
         sd = as.factor(c(3,4,1,.5)))
my_cols <- c("trial", "mean", "sd")
for(mc in my_cols) {
    df[[mc]] <- as.numeric(as.character(df[[mc]]))
}发布于 2017-04-10 03:31:16
如果要按列名进行选择性转换:
library(dplyr)
df %>% 
  mutate_if(names(.) %in% c("mean", "sd"), 
            function(x) as.numeric(as.character(x)))https://stackoverflow.com/questions/43314396
复制相似问题