setwd("S:/R/practise")
a<-read.csv("clustDABCON.csv",row.names = 1)
b<-data.frame(a$CON1,
              a$CON2,
              a$CON3,
              a$DAB1,
              a$DAB2,
              a$DAB3)
row.names(b)<-row.names(a)
b2<-t(b)
c1<-scale(b2,center=TRUE,scale=TRUE)
library(reshape2)
c<-melt(c1)
write.csv(c,"DABclust-Line1.csv")
d<-read.csv("DABCLUST-line.CSV")
ggplot(d,aes(x=d$Var1,y=d$value,color=as.factor(d$clust)))+
  geom_line()
想做许多线条（样本）在6个时期的变化量，用reshape变成长数据后，用ggplot2画完（本应该是一堆直线），却成了一堆垂直于X轴的直线，请问这是什么问题啊？