R.如何在数据框中添加求和行

我知道这个问题非常基础，但是我在添加额外的行以显示该行的摘要时遇到了麻烦。

假设我正在使用以下代码创建一个data.frame：

name <- c("James","Kyle","Chris","Mike")
nationality <- c("American","British","American","Japanese")
income <- c(5000,4000,4500,3000)
x <- data.frame(name,nationality,income)

上面的代码创建下面的data.frame：

  name nationality income
1 James    American  5000
2  Kyle     British  4000
3 Chris    American  4500
4  Mike    Japanese  3000

我想做的是添加第5行，其中包含：name =“ total”，国籍=“ NA”，age =所有行的总数。我想要的输出如下所示：

  name nationality  income
1 James    American  5000
2 Kyle     British   4000
3 Chris    American  4500
4 Mike    Japanese   3000
5 Total      NA      16500

在实际情况下，我的data.frame具有一千多行，因此我需要一种有效的方法来添加总行。

可以请教一下吗？非常感谢你！

我们可以用 rbind

 rbind(x, data.frame(name='Total', nationality=NA, income = sum(x$income)))
 #    name nationality income
 #1 James    American   5000
 #2  Kyle     British   4000
 #3 Chris    American   4500
 #4  Mike    Japanese   3000
 #5 Total          16500