ggplot 画折线图

yar903958481

各位大神，帮忙解答一下啦！非常感谢！！！
我的原始数据是：-0.002024561        1.401557        1.202661        -0.7015133        -0.684164        -0.6242453        -0.5922705

然后我用下面代码画图：

data1 <- read.table(file = "mean.txt",header = FALSE,sep = "\t")

data1 <- t(data1)
data1 <- cbind(c("L-0","L-7","L-14","L-21","L-28","L-35","L-42"),data1)
data1 <- data.frame(data1)
x.lable <- c("L-0","L-7","L-14","L-21","L-28","L-35","L-42")
ggplot() + geom_line(data=data1, mapping=aes(x=X1, y=X2,group=1), colour="black",stat = "identity") + scale_x_discrete(limits = x.lable)



得到的图形为
纵坐标为单个值而不是连续的刻度？这是什么原因？要怎么解决？求大神帮忙解答，谢谢啦~

chunfei_xu

原因data1 <- cbind(c("L-0","L-7","L-14","L-21","L-28","L-35","L-42"),data1)这条语句执行完之后，data1的属性变成了character，所以原来data1<-c(-0.002024561,1.401557,1.202661,-0.7015133,-0.684164,-0.6242453,-0.5922705)中赋值的数值型变成了字符，结果画图的时显示的坐标是字符而不是数值，所以是离散的。你可以改一下就行了。