2017-02-17 80 views
-3

这是我的数据总结数据帧的几列

> df<- as.data.frame(matrix(rnorm(15), 3)) 

> df 

      V1   V2   V3   V4   V5 
1 0.8757347 1.5984067 1.0295143 0.08161545 1.6208651 
2 -0.4039117 -0.9497641 -0.1747716 0.01544082 0.4639266 
3 -0.9055205 -0.9686378 0.9451551 -0.05030505 -1.4510613 

我怎么能在那个将总结只有最后两米栏的末尾添加列?

+0

'rowSums(DF [C(NcoI位(DF) - 1,NcoI位(DF))])'或在这种情况下'rowSums(DF [C(4,5 )])' –

+1

你可以做'df $ new < - rowSums(df [tail(names(df),2)])' – lmo

回答

2

这应该这样做

df<- as.data.frame(matrix(rnorm(15), 3)) 
> df$V6 <- df$V4 + df$V5 
> df 
      V1  V2   V3  V4   V5   V6 
1 -1.9786737 0.3909885 -0.03734145 0.1851501 1.5787765 1.7639266 
2 -0.4523491 0.6529999 -2.21683918 1.4337437 0.1738136 1.6075573 
3 0.4503717 0.3944558 0.84851336 0.3843997 -0.9938039 -0.6094042 
> 
+0

谢谢。如果我的值有一些NA? – Mac

+0

@Mustafa如果你有NA值,那么你必须决定如何处理它们。 – lmo