为什么R对象的值在R中的cbind输出中出现两次？

我想知道如何防止下面R代码中对象eta的数值重复，就像现在在cbind输出的第二行中一样，而不是在第二行中插入NA

以下是我当前的cbind输出：

这是我的R代码：

---

很确定eta值正在被回收。你可以试试 cbinda，eta=ceta，NA，以避免回收

          Df   Sum Sq   Mean Sq F value     Pr(>F)       eta
k          2 8.688793 4.3443964 5.47955 0.02038724 0.4773314
Residuals 12 9.514058 0.7928382      NA         NA 0.4773314(This one is repetitive! I want `NA` here)

k = gl(3, 5, 15)
y = as.vector(unlist(mapply(FUN = rnorm, n = rep(5, 3), mean = c(4, 5, 6))))
a = anova(aov(y ~ k))
eta = a[, 2][1] / (a[, 2][1] + a[, 2][2])
cbind(a, eta)