r - tibble add_row 不整洁？

Question

为什么以下代码不起作用。
我想在我之前从 tibble 复制的 tibble 中添加一行。

 library(dplyr)
 library(tibble)
 tiris <- as_tibble(iris)
 new_row <- tiris %>% tail(1)
 tiris <- tiris %>% add_row(new_row)

错误:列 new_row必须是一维原子向量或列表

Answer 1

new_row您创建的是一行 tibble ，所以我认为您需要的是 bind_rows来自 dplyr 的函数包，可以组合两个 tibble或 data frame按行。

library(dplyr)
library(tibble)
tiris <- as_tibble(iris)
new_row <- tiris %>% tail(1)
# Combine tiris and new_row
tiris <- tiris %>% bind_rows(new_row)

查看tiris的最后两行，它们是相同的。所以我想bind_rows作品。

# View the results
tail(tiris, 2)
# # A tibble: 2 x 5
#   Sepal.Length Sepal.Width Petal.Length Petal.Width Species  
#          <dbl>       <dbl>        <dbl>       <dbl> <fct>    
# 1         5.90        3.00         5.10        1.80 virginica
# 2         5.90        3.00         5.10        1.80 virginica