字符串中的总和数 (R)

Arn*_*nes 5 r sum vector

我有一个看起来像的向量:

numbers <- c("1/1/1", "1/0/2", "1/1/1/1", "2/0/1/1", "1/2/1")
Run Code Online (Sandbox Code Playgroud)

(不总是相同数量的“/”字符)

如何使用每个字符串的数字总和创建另一个向量?

就像是 :

sum
3
3
4
4
4
Run Code Online (Sandbox Code Playgroud)

Lyz*_*deR 4

一种解决方案是strsplitsapply

sapply(strsplit(numbers, '/'), function(x) sum(as.numeric(x)))
#[1] 3 3 4 4 4
Run Code Online (Sandbox Code Playgroud)

strsplit会分开你的刺/(不管/你有多少个)。的输出strsplit是一个列表,因此我们对其进行迭代以计算与 的总和sapply