r - 数値を data.frame に追加

Question

私はこれを達成したい:

df <- data.frame(val1 = c(10,11, 12, 13))
df2 <-  data.frame(c1 = 1, c2 = 2, c3 = 3, c4 = 4)
df <- data.frame(rep(df, NCOL(df2)))
df2 <- df2[rep(1, NROW(df)),]
df3 <- df + df2
df3
  val1 val1.1 val1.2 val1.3
1   11     12     13     14
2   12     13     14     15
3   13     14     15     16
4   14     15     16     17

まず、もっと簡単にできる方法はないかと考えています。

2番目。

別の df である可能性があります

h <- temp[EM.Names[[i]]]
    > head(h)
          MSCILATAM
    1  9.870000e-03
    2 -6.286546e-05
    3  1.035069e-02
    4  1.070432e-02
    5  5.072980e-03
    6  1.486852e-03

別の df2 が

> fixed.avg.yield.diff
    VENEZUELA          PERU      COLOMBIA        MEXICO        BRAZIL     ARGENTINA         CHILE 
 0.0037480080  0.0004009513  0.0034571043 -0.0014477117  0.0280813115  0.0006466359 -0.0000884484 
> class(h)
[1] "data.frame"
> > class(fixed.avg.yield.diff)
[1] "numeric"

この状況では、上記の解決策は機能しません。その理由は、「fixed.avg.yield.diff」を data.frame に変換しようとすると、次のように構造化されるためです。

 > data.frame(fixed.avg.yield.diff)
              fixed.avg.yield.diff
    VENEZUELA         0.0037480080
    PERU              0.0004009513
    COLOMBIA          0.0034571043
    MEXICO           -0.0014477117
    BRAZIL            0.0280813115
    ARGENTINA         0.0006466359
    CHILE            -0.0000884484