在Dataframe中计算,保留第一行作为参考

Question

对于N列,我的第一行是添加以下行的参考值.

数据

A   B   C   D
3   5   1   2

1   4   5   3
2   2   2   4
3   1   3   1
4   3   1   2

计算如下:

• 3,是添加的参考值,其中3应添加到1,2,3和4,类似地5是参考值 - 添加到4,2,1,3然后1是参考值添加到5,2,3,1等......直到n列.

  1 + 3   4 + 5   5 + 1   3 + 2
  2 + 3   2 + 5   2 + 1   4 + 2
  3 + 3   1 + 5   3 + 1   1 + 2
  4 + 3   3 + 5   1 + 1   2 + 2
  

预期产量:

A   B   C   D
4   9   6   5
5   7   3   6
6   6   4   3
7   8   2   4

请帮忙.谢谢.

Answer 1

也许就是这样:

c(mydf[1, ]) + mydf[-1, ]
##   A B C D
## 2 4 9 6 5
## 3 5 7 3 6
## 4 6 6 4 3
## 5 7 8 2 4

开始data.frame:

mydf <- structure(list(A = c(3L, 1L, 2L, 3L, 4L), B = c(5L, 4L, 2L, 1L, 
    3L), C = c(1L, 5L, 2L, 3L, 1L), D = c(2L, 3L, 4L, 1L, 2L)), .Names = c("A", 
    "B", "C", "D"), row.names = c(NA, 5L), class = "data.frame")