
z$Months <- as.factor(z$Months)
z$Months <- factor(z$Months, levels = c("Jan", "Feb", "Mar", "Apr", "May","Jun","Jul","Aug","Sep","Oct","Nov","Dec"))
sp1<-ggplot(z,aes(x=stm1, y=sml1),size=1) +
geom_line(aes(color=Months))+
ggtitle("soil temperature vs soil moisture")+
labs(x="stm1 (deg C)", y = "sml1 (mm)")+
scale_fill_manual(breaks=c("Jan", "Feb", "Mar", "Apr", "May", "Jun", "Jul", "Aug", "Sep", "Oct", "Nov", "Dec"),
values=c("#800000","#DC143C","#FFA07A","#FFD700","#BDB76B","#6B8E23","#2E8B57","#008080","#00CED1","#4682B4","#191970","#8A2BE2"))
sp1
Я построил взаимосвязь между двумя переменными sml1 и stm1 на основе месяцев, но между данными за разные месяцы есть разрывы. Как соединить зазор между линиями, чтобы цвет соединительной линии был таким же, как у любой из соединяемых линий.