使用break ggplot时，保持网格线和（可选）刻度线

Question

我正在使用ggplot创建一个折线图，该图使用breaks来仅显示部分标签。问题在于，当我这样做时，未标记的刻度线，更重要的是，与这些刻度线相关联的网格线消失。我真的需要保留网格线。留下的刻度线会很好，但不是必需的。

下面的代码将生成一个图表，显示我正在处理的内容。

谢谢！

count<-c(1,5,6,8,3)
period<-c(1,2,3,4,5)

df<-data.frame(count,period)

library('ggplot2')
ggplot(data=df, aes(x = period, y =count ,group=1)) +
  geom_line(size=1)+
  scale_x_discrete(breaks=c(1,3,5),
                   labels=c("One",'Two','Three'))