顶顶顶。。。求解

a<-read.csv(file='/Users/*******/Desktop/data1-2.csv',head=TRUE, na.strings = c('',NA))
library(ggplot2)
head(a)
c<-as.vector(a$Main.ref)
c[is.na(c)]=0
for (i in (1:nrow(a))){
  ifelse(c[i]==0,c[i]<-c[i-1],c[i]<-c[i])}
d<-data.frame(c,a[,2:4])
ggplot(data=d,aes(x=Time.relative,y=AFP.value,color=c))+
  geom_line(aes(group=c))+geom_point()

用你前100数据做了个图。你数据差别太大 整体作图看不出来什么东西的

谢谢，请问如何设置纵坐标轴的范围呢，用ylim=c( , )好像不行呢