如何解决加入数据框列表
我想从一个数据框中创建一个包含多个样本的列表,然后将它们重新加入到相同数量的数据框中。
在下面的示例中,我创建数据框,将其复制10次并添加“ 0”列。然后,我将原始df的N = 3样本进行10次采样,并将其赋予“ 1”。
我无法将10个较大的数据框与样本列表结合在一起。
下面是示例和我正在尝试的联接。我已经尝试了https://dplyr.tidyverse.org/reference/join.html中的所有join变体,但无法接近我想要的东西。
promise
对于所有10个已编辑的数据帧,我都会期望以下内容:
library(tidyverse)
name <- c('A','B','C','D','E','F','G','H','I','J','K')
value <- c(3,5,2,4,7,9,3,7)
df <- data.frame(name,value)
colnames(df) <- c("name","value")
dflist <- replicate(10,df,simplify = F)
dflist1 <- lapply(dflist,function(x){mutate(x,labels=0)})
dfsamp <- replicate(10,df %>% sample_n(3),simplify = F)
dfsamp1 <- lapply(dfsamp,labels=1)})
finaldf <- list()
for( i in 1:length(dflist))
{
finaldf <- c(finaldf,dflist1[[i]] %>% nest_join(dfsamp1[[i]]))
}
任何帮助将不胜感激。谢谢
版权声明:本文内容由互联网用户自发贡献,该文观点与技术仅代表作者本人。本站仅提供信息存储空间服务,不拥有所有权,不承担相关法律责任。如发现本站有涉嫌侵权/违法违规的内容, 请发送邮件至 dio@foxmail.com 举报,一经查实,本站将立刻删除。