1、
p<-ggplot(mtcars,aes(mpg,hp,colour=factor(cyl)))+geom_point() p

2、調整x軸
p+theme(axis.line.x=element_line(linetype=1,color="black",size=3))

3、調整x軸刻度線
p+theme(axis.ticks.x=element_line(color="black",size=3,lineend = 1))

4、調整y軸
p+theme(axis.line.y=element_line(linetype=1,color="black",size=3))

5、調整y軸刻度粗細
p+theme(axis.ticks.y=element_line(color="black",size=3,lineend = 10))

