r - R中带有嵌套数据框的过滤器列表
问题描述
我有一个由数据框组成的列表。该列表是由我无法控制的功能创建的。因此,每个数据框都包含我需要的更多信息。列表中每个数据框的结构都是相同的。我需要做的是按一列的值过滤掉行并将其写入新列表。该列表包含 1000 多个相同结构的数据帧。
historical_file[1]
$daily_kl_historical_tageswerte_KL_00001_19370101_19860630_hist
STATIONS_ID MESS_DATUM QN_3 FX FM QN_4 RSK RSKF SDK SHK_TAG NM VPM PM TMK UPM TXK TNK TGK eor
1 1 1937-01-01 NA NA NA 5 0.0 0 NA 0 6.3 NA NA -0.5 NA 2.5 -1.6 NA eor
2 1 1937-01-02 NA NA NA 5 0.0 0 NA 0 3.0 NA NA 0.3 NA 5.0 -4.0 NA eor
3 1 1937-01-03 NA NA NA 5 0.0 0 NA 0 4.3 NA NA 3.2 NA 5.0 -0.2 NA eor
4 1 1937-01-04 NA NA NA 5 0.0 0 NA 0 8.0 NA NA 0.2 NA 3.8 -0.2 NA eor
5 1 1937-01-05 NA NA NA 5 0.0 0 NA 0 8.0 NA NA 1.4 NA 4.5 -0.7 NA eor
6 1 1937-01-06 NA NA NA 5 5.2 7 NA 0 6.0 NA NA 0.2 NA 2.0 -2.4 NA eor
[ reached 'max' / getOption("max.print") -- omitted 17296 rows ]
$daily_kl_historical_tageswerte_KL_00003_18910101_20110331_hist
STATIONS_ID MESS_DATUM QN_3 FX FM QN_4 RSK RSKF SDK SHK_TAG NM VPM PM TMK UPM TXK TNK TGK eor
1 3 1891-01-01 NA NA NA 5 0.0 0 NA NA 0.0 4.3 NA -3.6 88 0.5 -5.9 NA eor
2 3 1891-01-02 NA NA NA 5 0.0 0 NA NA 2.7 4.1 NA -2.8 84 0.0 -5.8 NA eor
3 3 1891-01-03 NA NA NA 5 2.5 1 NA NA 3.7 3.9 NA -0.2 69 2.1 -6.2 NA eor
4 3 1891-01-04 NA NA NA 5 8.2 1 NA NA 8.0 6.4 NA 1.8 90 3.7 0.6 NA eor
5 3 1891-01-05 NA NA NA 5 1.9 1 NA NA 7.7 4.7 NA -2.5 87 1.5 -4.2 NA eor
6 3 1891-01-06 NA NA NA 5 2.5 1 NA NA 8.0 3.5 NA -5.8 88 -4.0 -6.9 NA eor
我想过滤每个数据帧MESS_DATUM
。所以在一个单独的数据框上我会做
historical_file_new<-historical_file%>%filter(MESS_DATUM>'2000-07-01')
如何在这个列表中做到这一点?
解决方案
你把你filter
的lapply
library(dplyr)
l <- list(iris,iris)
lapply(l,function(x) filter(x,Species=="setosa"))
#> [[1]]
#> Sepal.Length Sepal.Width Petal.Length Petal.Width Species
#> 1 5.1 3.5 1.4 0.2 setosa
#> 2 4.9 3.0 1.4 0.2 setosa
#> 3 4.7 3.2 1.3 0.2 setosa
#> 4 4.6 3.1 1.5 0.2 setosa
#> 5 5.0 3.6 1.4 0.2 setosa
#> 6 5.4 3.9 1.7 0.4 setosa
#> 7 4.6 3.4 1.4 0.3 setosa
#> 8 5.0 3.4 1.5 0.2 setosa
#> 9 4.4 2.9 1.4 0.2 setosa
#> 10 4.9 3.1 1.5 0.1 setosa
#> 11 5.4 3.7 1.5 0.2 setosa
#> 12 4.8 3.4 1.6 0.2 setosa
#> 13 4.8 3.0 1.4 0.1 setosa
#> 14 4.3 3.0 1.1 0.1 setosa
#> 15 5.8 4.0 1.2 0.2 setosa
#> 16 5.7 4.4 1.5 0.4 setosa
#> 17 5.4 3.9 1.3 0.4 setosa
#> 18 5.1 3.5 1.4 0.3 setosa
#> 19 5.7 3.8 1.7 0.3 setosa
#> 20 5.1 3.8 1.5 0.3 setosa
#> 21 5.4 3.4 1.7 0.2 setosa
#> 22 5.1 3.7 1.5 0.4 setosa
#> 23 4.6 3.6 1.0 0.2 setosa
#> 24 5.1 3.3 1.7 0.5 setosa
#> 25 4.8 3.4 1.9 0.2 setosa
#> 26 5.0 3.0 1.6 0.2 setosa
#> 27 5.0 3.4 1.6 0.4 setosa
#> 28 5.2 3.5 1.5 0.2 setosa
#> 29 5.2 3.4 1.4 0.2 setosa
#> 30 4.7 3.2 1.6 0.2 setosa
#> 31 4.8 3.1 1.6 0.2 setosa
#> 32 5.4 3.4 1.5 0.4 setosa
#> 33 5.2 4.1 1.5 0.1 setosa
#> 34 5.5 4.2 1.4 0.2 setosa
#> 35 4.9 3.1 1.5 0.2 setosa
#> 36 5.0 3.2 1.2 0.2 setosa
#> 37 5.5 3.5 1.3 0.2 setosa
#> 38 4.9 3.6 1.4 0.1 setosa
#> 39 4.4 3.0 1.3 0.2 setosa
#> 40 5.1 3.4 1.5 0.2 setosa
#> 41 5.0 3.5 1.3 0.3 setosa
#> 42 4.5 2.3 1.3 0.3 setosa
#> 43 4.4 3.2 1.3 0.2 setosa
#> 44 5.0 3.5 1.6 0.6 setosa
#> 45 5.1 3.8 1.9 0.4 setosa
#> 46 4.8 3.0 1.4 0.3 setosa
#> 47 5.1 3.8 1.6 0.2 setosa
#> 48 4.6 3.2 1.4 0.2 setosa
#> 49 5.3 3.7 1.5 0.2 setosa
#> 50 5.0 3.3 1.4 0.2 setosa
#>
#> [[2]]
#> Sepal.Length Sepal.Width Petal.Length Petal.Width Species
#> 1 5.1 3.5 1.4 0.2 setosa
#> 2 4.9 3.0 1.4 0.2 setosa
#> 3 4.7 3.2 1.3 0.2 setosa
#> 4 4.6 3.1 1.5 0.2 setosa
#> 5 5.0 3.6 1.4 0.2 setosa
#> 6 5.4 3.9 1.7 0.4 setosa
#> 7 4.6 3.4 1.4 0.3 setosa
#> 8 5.0 3.4 1.5 0.2 setosa
#> 9 4.4 2.9 1.4 0.2 setosa
#> 10 4.9 3.1 1.5 0.1 setosa
#> 11 5.4 3.7 1.5 0.2 setosa
#> 12 4.8 3.4 1.6 0.2 setosa
#> 13 4.8 3.0 1.4 0.1 setosa
#> 14 4.3 3.0 1.1 0.1 setosa
#> 15 5.8 4.0 1.2 0.2 setosa
#> 16 5.7 4.4 1.5 0.4 setosa
#> 17 5.4 3.9 1.3 0.4 setosa
#> 18 5.1 3.5 1.4 0.3 setosa
#> 19 5.7 3.8 1.7 0.3 setosa
#> 20 5.1 3.8 1.5 0.3 setosa
#> 21 5.4 3.4 1.7 0.2 setosa
#> 22 5.1 3.7 1.5 0.4 setosa
#> 23 4.6 3.6 1.0 0.2 setosa
#> 24 5.1 3.3 1.7 0.5 setosa
#> 25 4.8 3.4 1.9 0.2 setosa
#> 26 5.0 3.0 1.6 0.2 setosa
#> 27 5.0 3.4 1.6 0.4 setosa
#> 28 5.2 3.5 1.5 0.2 setosa
#> 29 5.2 3.4 1.4 0.2 setosa
#> 30 4.7 3.2 1.6 0.2 setosa
#> 31 4.8 3.1 1.6 0.2 setosa
#> 32 5.4 3.4 1.5 0.4 setosa
#> 33 5.2 4.1 1.5 0.1 setosa
#> 34 5.5 4.2 1.4 0.2 setosa
#> 35 4.9 3.1 1.5 0.2 setosa
#> 36 5.0 3.2 1.2 0.2 setosa
#> 37 5.5 3.5 1.3 0.2 setosa
#> 38 4.9 3.6 1.4 0.1 setosa
#> 39 4.4 3.0 1.3 0.2 setosa
#> 40 5.1 3.4 1.5 0.2 setosa
#> 41 5.0 3.5 1.3 0.3 setosa
#> 42 4.5 2.3 1.3 0.3 setosa
#> 43 4.4 3.2 1.3 0.2 setosa
#> 44 5.0 3.5 1.6 0.6 setosa
#> 45 5.1 3.8 1.9 0.4 setosa
#> 46 4.8 3.0 1.4 0.3 setosa
#> 47 5.1 3.8 1.6 0.2 setosa
#> 48 4.6 3.2 1.4 0.2 setosa
#> 49 5.3 3.7 1.5 0.2 setosa
#> 50 5.0 3.3 1.4 0.2 setosa
由reprex 包于 2020-04-20 创建(v0.3.0)
推荐阅读
- javascript - 如何制作循环以确定将在JS上拾取哪个变量
- excel - 在 Power Query 中刷新数据时,如何添加保持不变的唯一 ID?
- javascript - 使用量角器进行 e2e 测试的 Google 优化
- php - 如何通过 PHP 将视频上传到 Facebook 活动页面
- java - 如何为我的可执行 jar 文件定义正确的类路径?
- merge - 在挂起的更改中恢复合并,但保留本地更改 (Azure Devops)
- windows - 根据文件名上的前几个文本批量移动文件
- javascript - 引导轮播控件不更改活动类
- nginx - OpenShift / NGiNX 反向代理指南 - 传递到基于 SDN 的地址?
- reactjs - RefrenceError:属性“代理”不存在