如何从数据表指定列提取唯一值创建vector并导出供Excel使用

• 前提：你已经将原始数据表导入R环境，存储为data.frame/tibble格式的对象df
• 提取"Estacao"列的唯一值并生成向量：
  基础R写法：
  estacao_unique_vec <- unique(df$Estacao)
  dplyr写法（适合tidyverse生态用户）：

  library(dplyr)
  estacao_unique_vec <- df %>% pull(Estacao) %>% unique()
  

• 导出为Excel可直接使用的文件，提供两种可选方案：
  1. 导出为CSV格式（无需额外安装包，Excel直接兼容）
     write.csv(data.frame(Estacao唯一值 = estacao_unique_vec), "estacao_唯一值列表.csv", row.names = FALSE, fileEncoding = "GBK")

  注：如果打开CSV出现乱码，可将fileEncoding参数值改为"UTF-8"

  2. 直接导出为XLSX格式
     首次使用先安装依赖包：
     install.packages("openxlsx")
     执行导出：

  library(openxlsx)
  write.xlsx(data.frame(Estacao唯一值 = estacao_unique_vec), "estacao_唯一值列表.xlsx", rowNames = FALSE)
  

导出完成后打开生成的文件，即可直接复制内容到你需要的Excel场景使用。

内容的提问来源于stack exchange，提问作者gabieljaick