多重折线图自定义X轴间隔与自定义title名称—R语言

InputData


Rcode

library(ggplot2)
data<-read.csv("D:\\rwork\MSN\\indexbyminutes.csv",header = T)
dt<-data.frame(data)
head(dt)
#mode(dt$ID)
#class(dt$ID)
#dt$ID2<-dt$as.vector(dt$ID)
#class(dt$ID)
ggplot(dt,aes(x=reorder(dt$ID,dt$order),y=dt$name,colour=factor(dt$label),group=dt$label))+
    geom_line(size=1)+
    scale_colour_discrete(labels=c("PageView","Click","Ap","Ad","Unload"))+
    scale_y_continuous(breaks=seq(0,900,100))+
  scale_x_discrete(breaks=seq(0,59,10))+
  ggtitle("Index By Minutes_Sample Data")+
  xlab("Minutes")+ylab("Count")+labs(colour="Index")
ggsave("Index By Minutes_Sample Data.png",width=20,height=10,unit="cm",dpi=300)
getwd()

注意点


结果




阅读更多
文章标签: r语言 ggplot2 scale
想对作者说点什么? 我来说一句

没有更多推荐了,返回首页

加入CSDN,享受更精准的内容推荐,与500万程序员共同成长!
关闭
关闭