技术：高效文本拼接

library(tidyverse)

## Error in `library()`:
## ! there is no package called 'tidyverse'

library(glue)

## Error in `library()`:
## ! there is no package called 'glue'

mtcars %>%
  transmute(description =
           glue("这种车 {rownames(.)} 的 hp 有 {hp}"))

## Error in `mtcars %>% transmute(description = glue("这种车 {rownames(.)} 的 hp 有 {hp}"))`:
## ! could not find function "%>%"

glue(..., .sep = "", .envir = parent.frame(), .open = "{", .close = "}")