如何在R Studio中导入Excel/CSV数据并制作多图表及脚本适配求助

别慌！离截止日期还有时间，我一步步教你把Excel数据导入R并运行这个绘图脚本：

首先需要安装并加载读取Excel的工具包，推荐用readxl（和你已经在用的dplyr、ggplot2同属tidyverse生态，适配性更好）：

• 安装包（第一次用的话运行）：

  install.packages("readxl")
  

• 加载包：

  library(readxl)
  

• 读取你的Excel文件：
  假设你的Excel文件名叫your_data.xlsx，并且和你的R脚本放在同一个文件夹里，直接运行：

  your_data <- read_excel("your_data.xlsx")
  

  如果文件不在同一路径，就写完整路径，比如Windows系统："C:/Users/你的用户名/Documents/your_data.xlsx"，Mac系统："/Users/你的用户名/Documents/your_data.xlsx"。

示例脚本用的babynames数据集有year（年份）、n（数量）、name（姓名）、sex（性别）这几个核心列，你需要确保你的数据和这个结构匹配：

• 如果你的列名不一样（比如你的年份列叫年份，数量列叫出生数），先重命名列：

  library(dplyr) # 已经在你的脚本里加载过，这里如果没加载就运行
  your_data <- your_data %>%
    rename(year = 年份, n = 出生数, name = 姓名, sex = 性别)
  

• 然后筛选你需要的名字和性别，和示例逻辑一致：

  don <- your_data %>% filter(name %in% c("你要选的名字1", "你要选的名字2", "你要选的名字3")) %>% filter(sex=="F")
  

直接用你原来的绘图代码就行，把数据换成你处理好的don：

don %>% ggplot( aes(x=year, y=n, group=name, color=name)) +
  geom_line() +
  scale_color_viridis(discrete = TRUE) +
  ggtitle("你的图表标题") # 这里可以改成你自己的标题，比如"XX名字的流行趋势"
  theme_ipsum() +
  ylab("你的Y轴标签") # 比如"出生人数"

• 检查你的Excel文件有没有合并单元格、空行这类脏数据，不然读取的时候容易出错；
• 如果读取后year是字符类型，用your_data <- your_data %>% mutate(year = as.numeric(year))转换成数值型；
• 如果安装包失败，检查网络连接，或者换个CRAN镜像源试试。

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