长格式转宽格式R

在R中，可以使用tidyr包中的pivot_longer()函数将长格式的数据转换为宽格式。下面是一个示例代码：

# 安装和加载tidyr包
install.packages("tidyr")
library(tidyr)

# 创建一个长格式的数据框
df <- data.frame(
  id = c(1, 2, 3),
  name = c("John", "Alice", "Bob"),
  test1 = c(80, 90, 85),
  test2 = c(75, 85, 90),
  test3 = c(70, 95, 80)
)

# 使用pivot_longer函数将数据从长格式转换为宽格式
df_wide <- pivot_longer(df, cols = starts_with("test"), names_to = "test", values_to = "score")

# 打印转换后的宽格式数据
print(df_wide)

在上面的代码中，我们首先安装并加载了tidyr包。然后，我们创建了一个长格式的数据框df，它包含了id、name和三次测试的分数。接下来，我们使用pivot_longer()函数将数据从长格式转换为宽格式。cols参数指定了要转换的列，names_to参数指定了新的宽格式数据框中存储列名的列名，values_to参数指定了新的宽格式数据框中存储值的列名。最后，我们打印出转换后的宽格式数据框df_wide。

注意：在使用pivot_longer()函数之前，确保你已经安装了tidyr包，并且使用library(tidyr)加载了该包。