,可以使用reshape2包中的melt和dcast函数。
library(reshape2)
# 创建示例数据集
data <- data.frame(ID = c(1, 2, 3),
var1 = c(10, 20, 30),
var2 = c(100, 200, 300))
# 使用melt函数将数据从宽格式转换为长格式
melted_data <- melt(data, id.vars = "ID")
# 输出转换后的数据
print(melted_data)
library(reshape2)
# 创建示例数据集
data <- data.frame(ID = c(1, 1, 2, 2, 3, 3),
variable = c("var1", "var2", "var1", "var2", "var1", "var2"),
value = c(10, 100, 20, 200, 30, 300))
# 使用dcast函数将数据从长格式转换为宽格式
casted_data <- dcast(data, ID ~ variable)
# 输出转换后的数据
print(casted_data)
参考链接:
领取专属 10元无门槛券
手把手带您无忧上云