将数字更改为其数字的总和

Question

我有一个简单的问题：如何将由10个数字组成的向量更改为由10个数字组成的向量，这些数字是第一个数字的总和？因此，第一个向量中的11变为2，234变为9。

Answer 1

我们可以使用str_extract_all中的stringr获取单个数字，将其转换为numeric并获取sum。

library(stringr)
sapply(str_extract_all(c(11, 234), '\\d'), function(x) sum(as.numeric(x)))