r - 合并和替换字符列

Question

我有一个包含 2 列的数据框，我想要合并:

     Region             PA
1     Mbeya    Ruaha National Park
2     Mbeya    Ruaha National Park
3     Mbeya    Ruaha National Park
4     Mbeya    Ruaha National Park
5     Mbeya    Ruaha National Park
6     Mbeya    Ruaha National Park
7     Mbeya    NA
8     Mbeya    NA
9     Mbeya    NA
10    Mbeya    NA

可以通过获取 PA 值并覆盖行中的区域值，或者用该行的区域中的值替换 PA 中的所有 NA 来合并。

我已经尝试过:

  Carcass.cleaned$New<-rowSums(Carcass.cleaned[, c("PA", "Region")], na.rm=T)
    Error in base::rowSums(x, na.rm = na.rm, dims = dims, ...) : 
      'x' must be numeric
    
    with(Carcass.cleaned,ifelse(is.na(PA),Region,PA))
    (returns list of numbers)
    
    and coalesce(Carcass.cleaned$PA, Carcass.cleaned$Region) 
    unite(Carcass.cleaned, new, PA:Region, sep='') 
 (both merge the columns names instead of replacing)

Answer 1

您可以使用简单的 if else 语句:

df$Region <- ifelse(is.na(df$PA), df$Region, df$PA)

基本上，只要 PA 是 NA，您就保持 Region 不变，而当 PA 有值时，您就会覆盖 Region 中的值。后记如果你愿意的话你可以删除PA