带连续列的R图

Question

我愿意在下面用这些数据在R中做一些折线图。目前，我的代码出现错误。任何帮助将受到欢迎。

data <- structure(list(names = c("AB", "BBB", "CCC"), day1 = c(2L, 4L, 
14L), day2 = c(2.2, 10, 25), day3 = c(1.2, 12, 12), day4 = c(1.7, 
4, 12), day5 = c(2L, 10L, 14L)), .Names = c("names", "day1", 
"day2", "day3", "day4", "day5"), row.names = c(NA, -3L), class = "data.frame") 

data 
#names day1 day2 day3 day4 day5 
#AB  2 2.2 1.2 1.7 2 
#BBB 4 10 12 4 10 
#CCC 14 25 12 12 14 


ggplot(data, aes(day1:day5, names, color = names)) + geom_line() 

Answer 1

试试这个：

data <- structure(list(names = c("AB", "BBB", "CCC"), day1 = c(2L, 4L, 
14L), day2 = c(2.2, 10, 25), day3 = c(1.2, 12, 12), day4 = c(1.7, 
4, 12), day5 = c(2L, 10L, 14L)), .Names = c("names", "day1", 
"day2", "day3", "day4", "day5"), row.names = c(NA, -3L), class = "data.frame") 

dat_m <- melt(data, id.var = "names") 
ggplot(df_m, aes(variable, value, colour = names, group = names)) + geom_line() 

这导致了这个情节：

Answer 2

library("ggplot2") 
library("reshape2") 

data <- data.frame(
    "names"=c("AB","BBB","CCC"), 
    "day1"=c(2,4,14), 
    "day2"=c(2.2,10,25), 
    "day3"=c(1.2,12,12), 
    "day4"=c(1.7,4,12), 
    "day5"=c(2,10,14) 
) 

test_data_long <- melt(data, id="names") # convert to long format 
ggplot(data=test_data_long,aes(variable,value, colour=names)) + 
     geom_line(aes(group = names))