如何创建仅对数字列求和的列？

我有一个包含很多列的数据框。

LABEL    COL1  COL2  COL3
Meat     10    20    30
Veggies  20    30    40

如何使列命名SUMCOL加起来COL1, COL2, COL3，以及我添加的任何其他数字列？

的例子SUMCOL仅包含上面的列：

SUMCOL
60
90

您可以使用此功能，它利用了select_if和范围参数is_numeric

myfun <- function(df) {
               require(dplyr)
               y <- select_if(df, is_numeric)
               rowSums(y, na.rm=T)
         }

Solution

df$SUMCOL <- myfun(df)

Output

    LABEL COL1 COL2 COL3 SUMCOL
1    Meat   10   20   30     60
2 Veggies   20   30   40     90