使用此代码:
library(ggplot2)
ToothGrowth$dose <- as.factor(ToothGrowth$dose)
p <- ggplot(ToothGrowth, aes(x=dose, y=len, color=dose, shape=dose)) +
geom_jitter(position=position_jitter(0.2))+
labs(title="Plot of length by dose",x="Dose (mg)", y = "Length")
p + theme_classic()
我希望得到这样的图像:
但是我怎么会这样做呢:
注意缺少的x轴是y轴线。 我该如何启用它?
这是theme_classic()
具体问题。
答案 0 :(得分:2)
以下是此GitHub issue
的解决方案p + theme_classic() +
theme(axis.line.x = element_line(colour = 'black', size=0.5, linetype='solid'),
axis.line.y = element_line(colour = 'black', size=0.5, linetype='solid'))