將基於列名不數

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)) 

今天我收集的動物物種的數據。不知道爲什麼我將它們加在一起。