-2

キーの要素によって与えられる順序でキーによって値を返す短い方法はありますか?

vars<-c("a"=1,"b"=2)
key<-c("b","a")
ret<-c()
for(k in key)
ret<-c(ret,vars[names(vars) %in% k])
ret
4

2 に答える 2

1

私はあなたが単に欲しいと信じていますvars[key]

于 2013-09-17T09:28:43.857 に答える
1

私はintersectあなたに役立つと思います...

vars[ intersect(key,names(vars)) ]
#b a 
#2 1
于 2013-09-17T11:21:25.330 に答える