如何填充缺少的匹配值

Question

我正在使用匹配功能，但是当找不到匹配项时，我希望返回文本：

INPUT

Map<-c("hi","bye")
r<-data.frame(x= c("bye","hi",3909090))
r$y<- c(100,200,300)
r
r$MatchColumn  <- Map[ match(r$x,Map)  ]
r
is.na(r$MatchColumn)

输出

> r
        x   y
1     bye 100
2      hi 200
3 3909090 300
> r$MatchColumn  <- Map[ match(r$x,Map)  ]
> r
        x   y MatchColumn
1     bye 100         bye
2      hi 200          hi
3 3909090 300        <NA>  ####################### YOU CAN SEE THE NA HERE
> is.na(r$MatchColumn)
[1] FALSE FALSE  TRUE

我希望r看起来像这样：

> r
        x   y MatchColumn
1     bye 100         bye
2      hi 200          hi
3 3909090 300        Missing Data

我想以某种方式使用is.na（r $ MatchColumn）吗？

谢谢。

Answer 1

这是你要找的吗？

r$MatchColumn[is.na(r$MatchColumn)] <- 'Missing Data'