r 创建将行标记为在两个数据集之间匹配的列

Posted 2021-05-24

tags:

篇首语：本文由小常识网(cha138.com)小编为大家整理，主要介绍了r 创建将行标记为在两个数据集之间匹配的列相关的知识，希望对你有一定的参考价值。

pop <- read.csv(paste("~/R/dumb_shit/import/","pop.csv",sep=""), header = FALSE, sep = ",", quote = "\"",stringsAsFactors = FALSE, encoding="UTF-8")
coverage <- read.csv(paste("~/R/dumb_shit/import/","coverage.csv",sep=""), header = FALSE, sep = ",", quote = "\"",stringsAsFactors = FALSE, encoding="UTF-8")

names(pop) <- c("City","State","Pop")
names(coverage) <- c("City","State")
find_match <- function(x) {
    result <- NA
    if(nrow(coverage[which(coverage$City==x["City"] & coverage$State==x["State"]),])>0) {
        result <- "Match"
    }
    return(result)
}
pop$Match <- apply(pop,1,find_match)
write.csv(pop, file = "~/R/dumb_shit/export/pop.csv",na="")

以上是关于r 创建将行标记为在两个数据集之间匹配的列的主要内容，如果未能解决你的问题，请参考以下文章