如何在将多个列值粘贴到一起时省略NA值？ [英] How to omit NA values while pasting numerous column values together?

问题描述

我有一个包含数百列的数据框dd2，我需要做的是将所有这些列值粘贴在一起，省略任何NA值。如果我做这样的事情

apply(dd2, 1, paste, collapse=",")

它实际上包括NA作为"NA"字符串。我想避免这种情况。我也可以按如下所示进行操作，但这需要我一次处理每个单独的列才能得到结果。

result <- cbind(    
    dd2, 
    combination = paste(dd2[,2], replace(dd2[,3], is.na(dd2[,3]), ""), sep = ",")
)

有什么有效的方法可以做到这一点吗？以下是示例数据：

dd2 <- structure(c("A", "B", "C", "D", "E", "AK2", "HFM1", NA, "TRR", 
"RTT", NA, "PPT", "TRR", "RTT", NA, "PPT", NA, NA, "GGT", NA), .Dim = c(5L, 
4L), .Dimnames = list(NULL, c("sample_id", "plant", "animal", 
"more")))

推荐答案

您可以尝试na.omit()省略这些值，然后粘贴。此外，您还可以使用toString()，因为它等同于paste(..., collapse = ", ")。

apply(dd2, 1, function(x) toString(na.omit(x)))
# [1] "A, AK2, PPT"      "B, HFM1, PPT"     "C, TRR"          
# [4] "D, TRR, RTT, GGT" "E, RTT"   

如果您有正在使用的特定列，则

apply(dd2[, cols], 1, function(x) toString(na.omit(x)))

这篇关于如何在将多个列值粘贴到一起时省略NA值？的文章就介绍到这了，希望我们推荐的答案对大家有所帮助，也希望大家多多支持IT屋！