r - 等效于R中字符串的总和

Question

This question already has answers here:

Cumulatively paste (concatenate) values grouped by another variable

(6个答案)


5年前关闭。




我正在寻找一种方法来执行等于字符串/字符格式文本而不是数字的R中的累加总和。不同的文本字段应串联在一起。

例如。在数据框“df”中:

A列包含输入，B列包含所需的结果。

  A        B
1 banana   banana 
2 boats    banana boats
3 are      banana boats are
4 awesome  banana boats are awesome

目前，我正在通过以下循环解决此问题

df$B <- ""

for(i in 1:nrow(df)) {
    if (length(df[i-1,"A"]) > 0) {
        df$B[i] <- paste(df$B[i-1],df$A[i])
    } else {
        df$B[i] <- df$A[i]
    }
}

我想知道是否存在更优雅/更快的解决方案。

最佳答案

(df$B <- Reduce(paste, as.character(df$A), accumulate = TRUE))
# [1] "banana"     "banana boats"      "banana boats are"    "banana boats are awesome"

关于r - 等效于R中字符串的总和，我们在Stack Overflow上找到一个类似的问题： https://stackoverflow.com/questions/35362575/

上一篇：botframework - 无法在 Carousel Hero Card 中显示项目

下一篇：jersey - 使用 Jersey 客户端 2.22.1 在 GET 请求中关闭连接

Answer 1

(df$B <- Reduce(paste, as.character(df$A), accumulate = TRUE))
# [1] "banana"     "banana boats"      "banana boats are"    "banana boats are awesome"