长、宽数据表格转换

excel数据读取

1. 使用 readxl 包读取 Excel 文件

library(readxl)            

2. 读取 Excel 文件：
   使用 read_excel() 函数读取 .xlsx 或 .xls 格式的文件。可以选择指定工作表名或工作表索引。

   # 读取 Excel 文件的默认工作表
   data <- read_excel("path_to_your_file.xlsx")
   
   # 读取指定工作表
   data <- read_excel("path_to_your_file.xlsx", sheet = "Sheet1")
   
   # 读取指定工作表的第一个工作表
   data <- read_excel("path_to_your_file.xlsx", sheet = 1)
   
   # 读取 Excel 文件时指定范围（例如 A1:B10）
   data <- read_excel("path_to_your_file.xlsx", range = "A1:B10")
   

长、宽数据表格转换

head(airquality)
A data.frame: 6 × 6
Ozone	Solar.R	Wind	Temp	Month	Day
<int>	<int>	<dbl>	<int>	<int>	<int>
1	41	190	7.4	67	5	1
2	36	118	8.0	72	5	2
3	12	149	12.6	74	5	3
4	18	313	11.5	62	5	4
5	NA	NA	14.3	56	5	5
6	28	NA	14.9	66	5	6

library(reshape2)     
data <- melt(airquality) 
head(data)  # 查看数据前6列
A data.frame: 6 × 2
variable	value
<fct>	<dbl>
1	Ozone	41
2	Ozone	36
3	Ozone	12
4	Ozone	18
5	Ozone	NA
6	Ozone	28

tail(data)   # 查看数据后6列
A data.frame: 6 × 2
variable	value
<fct>	<dbl>
913	Day	25
914	Day	26
915	Day	27
916	Day	28
917	Day	29
918	Day	30

默认情况下melt会认为全部为数值的每一列都是带有变量的值，包括月份和日期，都合并在了一起，标题行置于variable列，数值置于value列。但是有的时候我们想知道每月里面每一天空气指标臭氧、太阳、风和温度的值，这个时候我们可以设置id.vars=c(“”)来去除指定的列，只将其他数据做变形。
v2 = melt(v1, measure.vars = c()) 可以用measure.vars指定只用某些进行改变