我有50个数据集,我需要删除不必要的列。但问题是,如何同时去除它们呢?我每次只能删除一列,我的代码行正在增加。我想保持简短。
alabama <- data.frame(...)
alaska <- data.frame(...)
..
..
..
wisconsin <- data.frame(...)
wyoming <- data.frame(....)
这是一个常见的问题,你可以在这个网站上搜索并看到很多答案。其中一个选项是使用子集函数,
dataframe <- data.frame(alabama = 1:5, alaska = 2:5,,,,, wisconsin = 3:5, wyoming = 4:7 ) #choose the columns you want to keep
dataframe <- subset(dataframe, select = c(alabama, alaska,,,,, wisconsin, wyoming))
如果你需要任何解释,让我知道!
将对象保持在list
中,然后在一个步骤中完成
lst1 <- mget(tolower(state.name))
lst2 <- lapply(lst1, subset, select = 1:2)