要在R語言中提取數據并生成一個Excel表格，你可以使用readxl包來讀取數據，然后使用openxlsx包來寫入數據到Excel表格。
下面是一個示例代碼，演示了如何提取兩個數據框并將它們合并成一個Excel表格：
# 安裝并加載必要的包
install.packages("readxl")
install.packages("openxlsx")
library(readxl)
library(openxlsx)
# 讀取數據框
df1 <- read_excel("path_to_file1.xlsx")
df2 <- read_excel("path_to_file2.xlsx")
# 合并數據框
merged_df <- merge(df1, df2, by = "common_column")
# 寫入數據到Excel表格
write.xlsx(merged_df, file = "output_file.xlsx", rowNames = FALSE)
在上面的代碼中，你需要將path_to_file1.xlsx和path_to_file2.xlsx替換為你要讀取的數據文件的路徑，將common_column替換為兩個數據框中要合并的共同列名，將output_file.xlsx替換為要生成的Excel表格的文件名。
運行上面的代碼后，你將會在工作目錄中看到生成的Excel表格文件。
