R Excel 文件

在 R 中处理 Excel 文件（.xls 和 .xlsx 格式）是非常常见的任务，尤其是在数据分析中，很多时候需要从 Excel 文件中读取数据，或将分析结果导出到 Excel 文件。R 提供了多个包来实现这一功能，常见的包包括 readxl 和 openxlsx。

🎯 一、读取 Excel 文件

1. readxl 包

readxl 是一个非常流行且易于使用的包，用于读取 Excel 文件。它支持 .xls 和 .xlsx 格式。

安装并加载 readxl 包：

# 安装 readxl 包
install.packages("readxl")

# 加载 readxl 包
library(readxl)

读取 Excel 文件：

# 读取 Excel 文件中的第一个工作表
my_data <- read_excel("path/to/your/file.xlsx")

# 读取 Excel 文件中指定工作表
my_data <- read_excel("path/to/your/file.xlsx", sheet = "Sheet1")

# 查看数据的前几行
head(my_data)

• sheet 参数：可以通过工作表的名称或索引（数字）来指定要读取的工作表。
• 默认情况下，read_excel() 会将 Excel 文件中的数据读取为数据框（data.frame）。

2. openxlsx 包

openxlsx 是另一个功能强大的包，不仅支持读取 Excel 文件，还支持写入 Excel 文件。它还允许更多的自定义选项，如设置单元格样式、颜色等。

安装并加载 openxlsx 包：

# 安装 openxlsx 包
install.packages("openxlsx")

# 加载 openxlsx 包
library(openxlsx)

读取 Excel 文件：

# 读取 Excel 文件
my_data <- read.xlsx("path/to/your/file.xlsx", sheet = 1)

# 查看数据的前几行
head(my_data)

• sheet 参数：可以使用工作表的索引（数字）或者名称来指定要读取的工作表。

3. readr 包中的 read_csv() 和 read_delim()

虽然 readr 包专注于读取 CSV 文件，但它并不直接处理 Excel 文件。如果你有 Excel 文件的数据并希望将其保存为 CSV 文件，可以先使用 Excel 手动保存为 CSV 格式，或者使用 R 的其他包读取并保存为 CSV 格式。

✅ 二、写入 Excel 文件

1. 使用 openxlsx 写入 Excel 文件

openxlsx 包允许你将数据框（data.frame）写入 Excel 文件，同时还可以自定义样式、格式等。

写入 Excel 文件：

# 创建一个数据框
my_data <- data.frame(
  Name = c("Alice", "Bob", "Charlie"),
  Age = c(25, 30, 35),
  Score = c(95, 88, 92)
)

# 将数据框写入 Excel 文件
write.xlsx(my_data, "path/to/your/output.xlsx")

• write.xlsx() 将数据框写入 .xlsx 文件。

2. 向 Excel 文件添加多个工作表

你还可以将多个数据框写入同一个 Excel 文件，每个数据框保存到不同的工作表中。

# 创建多个数据框
my_data1 <- data.frame(Name = c("Alice", "Bob"), Age = c(25, 30))
my_data2 <- data.frame(Product = c("A", "B"), Price = c(100, 200))

# 创建一个新的 Excel 文件并写入多个工作表
write.xlsx(list(Sheet1 = my_data1, Sheet2 = my_data2), "path/to/your/output.xlsx")

• list(Sheet1 = my_data1, Sheet2 = my_data2) 将 my_data1 和 my_data2 分别写入两个工作表。

3. 使用 writexl 包写入 Excel 文件

writexl 包是另一个用于写入 Excel 文件的简单包，它可以将数据框保存为 .xlsx 文件。

安装并加载 writexl 包：

# 安装 writexl 包
install.packages("writexl")

# 加载 writexl 包
library(writexl)

写入 Excel 文件：

# 将数据框写入 Excel 文件
write_xlsx(my_data, "path/to/your/output.xlsx")

✅ 三、其他常见操作

1. 读取带有特定格式的 Excel 文件

如果 Excel 文件包含日期、数字等特定格式，readxl 和 openxlsx 会自动识别并正确加载数据，但你也可以通过其他参数对格式进行自定义。

# 使用 openxlsx 读取带有日期格式的 Excel 文件
my_data <- read.xlsx("path/to/your/file.xlsx", sheet = 1, colNames = TRUE, detectDates = TRUE)

• detectDates = TRUE 自动识别 Excel 中的日期格式。

2. 查看 Excel 文件的工作表名称

如果你不确定 Excel 文件中的工作表名称，可以使用 openxlsx 或 readxl 来查看。

# 使用 readxl 查看工作表名称
excel_sheets("path/to/your/file.xlsx")

# 使用 openxlsx 查看工作表名称
getSheets("path/to/your/file.xlsx")

🧪 四、小练习题

1. 使用 readxl 包读取一个名为 data.xlsx 的 Excel 文件，并查看文件中的数据。
2. 使用 openxlsx 包将一个包含学生姓名、年龄和分数的数据框保存到名为 students.xlsx 的文件中。
3. 创建一个包含多个工作表的 Excel 文件，并将其保存为 output.xlsx，其中每个工作表包含不同的数据框。

总结

R 提供了多种强大的工具来处理 Excel 文件，无论是读取、写入，还是自定义格式都可以轻松实现。如果你有任何问题或需要更多帮助，随时告诉我！😊