r - 如何使用过滤器文本创建另一列（列表数据小标题）到另一列

Question

我是秘鲁人，我正在学习用 R 编程。我需要获取另一个类似于 Data 的列。此列应使用关于列 Data（列表 tibble）的过滤器（列 x 具有过滤器文本）创建

这个作品不错！

DataFiltrada<-NULL; 
for (i in 1:nrow(Data)) {DataFiltrada[[i]]<-Data$Data[[i]] %>% filter_(Data$x[i])}
Data$DataFiltrada<-DataFiltrada
Data

如何在 r 中使用带有 purrr 的函数式编程？

请您的帮助！谢谢！

Data<-
tibble(
       x = c("x == 'a' & y ==  1","x == 'b' & y ==  2","x == 'c' & y ==  3"), 
       name = c("Data1", "Data2", "Data1")
       ) %>% 
left_join(
          list("Data1" = tibble(x = c("a","b","c"), y = c(1,2,3)),
               "Data2" = tibble(x = c("a","b"), y = c(1,2))) %>% 
            enframe(name = "name", value = "Data")
          ) 

这是我的数据...

标签： rfunctional-programmingpurrr