`theme_tufte` with `geom_rangeframe` doesn't work with `facet_wrap` about ggthemes HOT 2 CLOSED

library(ggplot2)
library(ggthemes)

p = ggplot(mtcars, aes(x = wt, y = mpg)) +
  geom_point() +
  scale_x_continuous(breaks = extended_range_breaks()(mtcars$wt)) +
  scale_y_continuous(breaks = extended_range_breaks()(mtcars$mpg)) +
  ggtitle("Cars")

p + 
  geom_rangeframe(
    data = data.frame(x = range(mtcars$wt), y = range(mtcars$mpg)), 
    aes(x, y), inherit.aes = FALSE
    ) +
  coord_cartesian(clip="off") +
  theme_tufte() +
  facet_wrap(~am)

## Arguably looks better if we use scales = 'free_y' to plot the y-axis
## labels in the RHS facet
p + 
  geom_rangeframe(
    data = data.frame(x = range(mtcars$wt), y = range(mtcars$mpg)), 
    aes(x, y), 
    inherit.aes = FALSE
    ) +
  coord_cartesian(clip="off") +
  theme_tufte() +
  facet_wrap(~am, scales = 'free_y')