R语言，怎么导出某一列对应的其他列的共有数据

是 否 +2 论坛币

k人 参与回答

经管之家送您一份

应届毕业生专属福利!

求职就业群

赵安豆老师微信：zhaoandou666

经管之家联合CDA

送您一个全额奖学金名额~ !

立即领取

感谢您参与论坛问题回答

经管之家送您两个论坛币！

+2 论坛币

各位老师，小弟想找出下表中山东和河北都有的item，并将这些共有的item及其他对应的数据写入一个新的文件中去，该怎么弄呢？谢谢，不胜感激。

扫码加我 拉你入群

请注明：姓名-公司-职位

以便审核进群资格，未注明则拒绝

分享0 收藏1 回帖

各位老师，下面是我写的代码，for循环后，print的结果是我想要的，请问怎么把结果保存成新的文件呢，恳请老师帮个忙，谢谢
library(readxl)
Thedata <-read_excel("Fish.xlsx")
library(dplyr)
DF1<-Thedata%>%filter(Area=="山东")
DF2<-Thedata%>%filter(Area=="河北")
DF<-intersect(DF1$item,DF2$item) #寻找两个区域item的交集
n1<-length(as.factor(DF))
newdata<-data.frame() #创建空白数据框
for(i in 1:n1){
newdata<-print(Thedata%>%filter(item==DF))}
              

library(tidyverse)
Thedata %>%
  group_by(item) %>%
  filter(length(unique(Area)) >= 2) %>%
  ungroup() %>%
  write.csv("mydata.csv")

cheetahfly 发表于 2019-5-13 21:27
library(tidyverse)
Thedata %>%
  group_by(item) %>%

谢谢老师…寥寥几行见功力，佩服您