如何将标准子设置操作的等效操作应用于 Dataframe 列表而不是单个 Dataframe

z5btuh9x  于 2023-01-06  发布在  其他
关注(0)|答案(1)|浏览(93)

我在一个文件夹中有一组40个不同的数据集,我已经将它们加载到RStudio的工作空间中:

datasets <- lapply(filepaths_list, read.csv, header = FALSE)

这个对象数据集是一个40个 Dataframe 的列表。我想运行代码,当对象是一个单独的 Dataframe 时,它的作用与下面的代码行相同:

All_sample_obs <- datasets[-1:-3,]

从那里,我同样想找到找到以下3个简单预处理转换步骤的迭代版本的方法:

All_sample_obs <- lapply(All_sample_obs, as.numeric)
All_sample_obs <- as.data.frame(All_sample_obs)
All_sample_obs <- round(All_sample_obs, 3)
w8f9ii69

w8f9ii691#

以下内容应满足您的需求:

All_sample_obs <- lapply(datasets, function(i) {i[-1:-3, ]})

All_sample_obs <- lapply(All_sample_obs, \(X) { lapply(X, as.numeric) })
All_sample_obs <- lapply(All_sample_obs, function(i) { as.data.frame(i) })
All_sample_obs <- lapply(All_sample_obs, \(X) { round(X, 3) })

我为lapplices使用的两种常见语法分别提供了两种解决方案,这两种语法都有效。

相关问题