基于列名而不是数字添加

Question

我使用以下代码将列添加到一起：

cbind(rowSums(data[,c(5,10,11,15)],na.rm=TRUE),rowSums(data[,c(3,6,7)],na.rm=TRUE))

但是我想根据列名而不是数字来添加列，以消除混淆....

有一种简单的方法吗？

Answer 1

是的，只需用引号中的列名替换数字：

 cbind(rowSums(data[,c('elephant','giraffe')],na.rm=TRUE),
       rowSums(data[,c('fish','penguin','albatross')],na.rm=TRUE))

我今天正在收集有关动物物种的数据。不知道为什么我要把它们加在一起。