r中元素的等级和标识

Question

我有两个具有不同元素的向量，例如x=c(1,3,4)，y= c(2,9)

我

想要一个范围向量，它标识我向量 1 的x元素和 0 的 y 元素，即

(1,2,3,4,9( -----> (1,0,1,1,0(

如何在 r 中得到零和一 (1,0,1,1,0( 的向量？

谢谢

Answer 1

以下选项肯定不是数值上的最佳选项，但它是最简单、最直接的选项：

a<-c(1,2,3,4)
b<-c(5,6,7,8)
f<-function(vec0,vec1,inp)
{
  out<-rep(NA,length(inp))       #NA if input elements in neither vector
  for(i in 1:length(inp))
  {                                      #Logical values coerced to 0 and 1 at first, then
    if(sum(inp[i]==vec0))(out[i]<-0);    #summed up and if sum != 0 coerced to logical "TRUE"
  }
  for(i in 1:length(inp))
  {
    if(sum(inp[i]==vec1))(out[i]<-1);
  }
  return (out)
}

工作正常：

> f(vec0=a,vec1=b,inp=c(1,6,4,8,2,4,8,7,10))
[1]  0  1  0  1  0  0  1  1 NA

Answer 2

首先定义一个函数来做到这一点

blah <- function( vector,
                 x=c(1,3,4), 
                 y= c(2,9)){
outVector <- rep(x = NA, times = length(vector))
outVector[vector %in% x] <- 1
outVector[vector %in% y] <- 0
return(outVector)  
}

然后您可以使用以下函数：

blah(vector = 1:9)
blah(vector = c(1,2,3,4,9))

您还可以更改 x & y 的值

blah(vector = 1:10,x = c(1:5*2), y = c((1:5*2)-1 ))