数据筛选后的排序问题R语言

是 否 +2 论坛币

k人 参与回答

经管之家送您一份

应届毕业生专属福利!

求职就业群

赵安豆老师微信：zhaoandou666

经管之家联合CDA

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

立即领取

感谢您参与论坛问题回答

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

+2 论坛币

有两个csv文件，一个data.csv,数据大概是这样
         name    English   Math  Gender  
1        xs           52       84        F
2        ab           34       23       F
3       bc           56       54        M
4......     共60个数据行；
另外一个是student.csv,只有一列，是name，但只有10行
        name
1   xs
2   cd
.....有10个名字
我想把data中的数据按照student中的name顺序筛选出来，并且按照student中的顺序排列，不要按照字母顺序
newdata<-subset(data,data$name%in%student)
但是选出来的newdata中name是乱序的，不是按照原来student中的顺序的，不知道有什么办法能够保留原来student中的顺序呢

扫码加我 拉你入群

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

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

分享0 收藏0 回帖

关键词：数据筛选 R语言 Student English Englis English

第一，你抽取的newdata应该为

1. newdata<-subset(data,data$name%in%student$name)

复制代码

再是你需要编一个小程序，如下：

1. ## function char_sub(x,y), x is the order of your requirement, y is
   
2. ## the data you want to order.
   
3. char_sub<-function(x,y){
   
4.   s<-numeric(length(x))
   
5.   for(i in 1:length(x)){
   
6.     for(j in 1:length(y)){
   
7.       if(x[i]==y[j])
   
8.         s[i]=j
   
9.     }
   
10.   }
    
11.   return(s)
    
12. }
    
13. newdata[char_sub(student$name,newdata$name),]

复制代码

这样就抽取出来了。

刚才一个代码写错了，现在改过来了[lol]

我自己后来想了个办法，在student中添加了一列Num按照1-10编号数字，然后用merge函数筛选
newdata<-merge(data,student,by="name",all.y=T)
之后再按照Num这列进行排序就可以了
newdata<-newdata[order(newdata$Num),]