r - ggplot2 在标记的刻度线之间显示未标记的刻度线

Question

我一直在直方图上显示小刻度线时遇到问题。我试过绘制未标记的主要刻度线的想法，但刻度线不会显示。我的代码非常繁琐，可能有一些多余的行。任何帮助，将不胜感激。

ggplot(data=Shrimp1, aes(Shrimp1$Carapace.Length))+
geom_histogram(breaks=seq(3.5, 25, by=0.1),
             col="black",
             fill="gray", 
             alpha=1)+ 

 labs(title="Total Female Carapace Length")+
 labs(x="Carapace Length (mm)", y="# of Shrimp")+
  xlim(c(3.5, 25))+
  theme_bw()+
scale_y_continuous(expand = c(0,0),
                     limits = c(0,200))+
scale_x_continuous(breaks=seq(2.5,25,2.5))+

theme(axis.text.x=element_text(size=30,angle=45,hjust=1))+
  theme(plot.title=element_text(size=30, hjust=0.5))+
  theme(axis.text=element_text(size=30, color = "black"), 
        axis.title=element_text(size=30,face="bold"))+
  theme(panel.grid.major=element_line(colour="white"), 
        panel.grid.minor = element_line(colour = "white"))+
  theme(panel.border=element_blank())+
  theme(axis.ticks.x = (element_line(size=2)), 
        axis.ticks.y=(element_line(size=2)))+
  theme(axis.ticks.length=unit(.55, "cm"))+
  theme(panel.border=element_blank(), axis.line.x=element_line(colour="black"),
        axis.line.y=element_line(colour="black"))

存在主要刻度，但我需要它们之间以 0.1 为间隔的次要刻度

Answer 1

我不认为您可以为次要中断添加刻度，但您可以像您所想的那样通过在 scale_x_continuous 中明确标记它们来拥有未标记的主要刻度。您可以使用带有 mod (%%) 的 bool 索引将“次要”刻度标签设置为空白。

同样，如果您希望“次要”刻度具有不同的大小，则可以在 theme 中明确设置刻度大小。

set.seed(5)
df <- data.frame(x = rnorm(500, mean = 12.5, sd = 3))

breaks <- seq(2.5, 25, .1)

labels <- as.character(breaks)
labels[!(breaks %% 2.5 == 0)] <- ''
tick.sizes <- rep(.5, length(breaks))
tick.sizes[(breaks %% 2.5 == 0)] <- 1

df %>% 
  ggplot(aes(x)) +
  geom_histogram(binwidth = .1, color = 'black', fill = 'gray35') +
  scale_x_continuous(breaks = breaks, labels = labels, limits = c(2.5,25)) +
  theme_bw() +
  theme(panel.grid = element_blank(), 
        axis.ticks.x = element_line(size = tick.sizes))

您可能还会从我的代码中注意到，您可以只调用一次 theme() 并将所有主题修改放入该调用中。