I would like to get a R plot with log-scale axes and fixed equal breaks on x and y. I transform the axes into log scale using the following code.
library(ggplot2)
p <- ggplot(cars*1000, aes(x = speed, y = dist)) + geom_point() +
scale_x_log10(breaks = trans_breaks("log10", function(x) 10^x),
labels = trans_format("log10", math_format(10^.x))) +
scale_y_log10(breaks = trans_breaks("log10", function(x) 10^x),
labels = trans_format("log10", math_format(10^.x)))
Now I want the x and y limits and ticks to be exactly the same from 0 to 10^5. I tried p + coord_fixed() and p + coord_equal() but it does not give me the same scaling.


limitsinsidescale_*_log10to be the same for both axes, thencoord_fixedshould work