悬赏请教个编程小问题

我有三个数据集（a,b,c）
a中有全部的观测，现在想在a中建立一个新的变量a$v，如果a中观测在b中v的值为1，如果在c中V的值为2
像这样如a:
id name V
1   TY
2   HJ
3   KL
4   GH
b：
id name
1   TY
2   HJ
3   KL

c:
id name
4  GH
整理完想要的结果像这样：
a:
id name  V
1   TY     1
2   HJ     1
3   KL     1
4   GH    2

请教各位大神在R中如何实现呢？

1. a<-list(id=1:4,name=c("TY","HJ","KL","GH"),V=rep(0,4))
   
2. b<-list(id=1:3,name=c("TY","HJ","KL"))
   
3. c<-list(id=1,name="GH")
   
4. for(i in 1: ncol(t(a$id)))
   
5. {
   
6.     for(j in 1:ncol(t(b$id)))
   
7.        {if(a$name[i]==b$name[j])
   
8.            a$V[i]=1     
   
9.        }
   
10.     for(s in 1:ncol(t(c$id)))
    
11.        {if(a$name[i]==c$name[s])
    
12.            a$V[i]=2     
    
13.        }
    
14. }
    
15. print(a)

复制代码

1. > a<-list(id=1:4,name=c("TY","HJ","KL","GH"),V=rep(0,4))
   
2. > b<-list(id=1:3,name=c("TY","HJ","KL"))
   
3. > c<-list(id=1,name="GH")
   
4. > for(i in 1: ncol(t(a$id)))
   
5. + {
   
6. +     for(j in 1:ncol(t(b$id)))
   
7. +        {if(a$name[i]==b$name[j])
   
8. +            a$V[i]=1     
   
9. +        }
   
10. +     for(s in 1:ncol(t(c$id)))
    
11. +        {if(a$name[i]==c$name[s])
    
12. +            a$V[i]=2     
    
13. +        }
    
14. + }
    
15. > print(a)
    
16. $id
    
17. [1] 1 2 3 4
    
18. 
    
19. $name
    
20. [1] "TY" "HJ" "KL" "GH"
    
21. 
    
22. $V
    
23. [1] 1 1 1 2

复制代码