Warning: file_get_contents(/data/phpspider/zhask/data//catemap/4/r/78.json): failed to open stream: No such file or directory in /data/phpspider/zhask/libs/function.php on line 167

Warning: Invalid argument supplied for foreach() in /data/phpspider/zhask/libs/tag.function.php on line 1116

Notice: Undefined index: in /data/phpspider/zhask/libs/function.php on line 180

Warning: array_chunk() expects parameter 1 to be array, null given in /data/phpspider/zhask/libs/function.php on line 181
R 计算一个向量的出现次数'；s值在另一个向量中_R_Vector_Count - Fatal编程技术网
Fatal编程技术网
  • r/
  • R 计算一个向量的出现次数'；s值在另一个向量中

R 计算一个向量的出现次数'；s值在另一个向量中

r vector

R 计算一个向量的出现次数'；s值在另一个向量中,r,vector,count,R,Vector,Count,我有两个向量 v1 <- c(164,38,20,19,163,22,21,4) v2 <- c(0,21,164,60,59,58,57,22,5,3,164,38,22,20,4,164,38,20,19,3,4,19,20,164,21,3,4,19,22,20,164,163,20,19,3) v1试试： 也许您正在寻找类似于%中的表和%的组合： > table(v2[v2 %in% v1]) 4 19 20 21 22 38 163 164

我有两个向量

v1 <- c(164,38,20,19,163,22,21,4) 
v2 <- c(0,21,164,60,59,58,57,22,5,3,164,38,22,20,4,164,38,20,19,3,4,19,20,164,21,3,4,19,22,20,164,163,20,19,3)

v1试试：


也许您正在寻找类似于%
中的
表和
%的组合：


> table(v2[v2 %in% v1])

  4  19  20  21  22  38 163 164 
  3   4   5   2   3   2   1   5 


或者，基于您的尝试，您可以尝试：


tv2 <- table(v2)
tv2[match(v1, names(tv2))]



tv2太好了，非常感谢。这正是我需要的。
是。元素（x，y）
与%y中的
x%相同
@Ananda，正确！Rle采用连续值，因此需要先排序！不管怎么说，桌子是最好的选择。我一直在寻找第一个答案，谢谢！取决于：您是否保证
v1
中的所有值都是唯一的？在我的情况下是的。

> table(v2[v2 %in% v1])

  4  19  20  21  22  38 163 164 
  3   4   5   2   3   2   1   5 



tv2 <- table(v2)
tv2[match(v1, names(tv2))]