I'm trying to create a series of histograms with the same range on the axis and crucially axis that lie at zero intercepts for both
mydat1 <- mydat + geom_histogram(binwidth = 5) + facet_wrap(~V2, scales = "free") + theme(axis.line.x = element_line(colour = "black", size = 0.05), axis.line.y = element_line(colour = "black", size = 0.05)) + scale_x_continuous(expand = c(0,0)) + scale_y_continuous(expand = c(0,0))
You could use
scale_y_continuous(limits = c(0, 15))
scale_x_continuous(limits = c(0, 400))
Does this work?