scale-breaks.r

vcontext("scale-breaks")
dat <- data.frame(x=1:3, y=1:3)

ggplot(dat, aes(x=x, y=y)) + geom_point() + scale_x_continuous(breaks=NULL)
save_vtest("no x breaks")

ggplot(dat, aes(x=x, y=y)) + geom_point() + scale_y_continuous(breaks=NULL)
save_vtest("no y breaks")

ggplot(dat, aes(x=1, y=y, alpha=x)) + geom_point() + scale_alpha_continuous(breaks=NULL)
save_vtest("no alpha breaks (no legend)")

ggplot(dat, aes(x=1, y=y, size=x)) + geom_point() + scale_size_continuous(breaks=NULL)
save_vtest("no size breaks (no legend)")

ggplot(dat, aes(x=1, y=y, fill=x)) + geom_point(shape=21) + scale_fill_continuous(breaks=NULL)
save_vtest("no fill breaks (no legend)")

ggplot(dat, aes(x=1, y=y, colour=x)) + geom_point() + scale_colour_continuous(breaks=NULL)
save_vtest("no colour breaks (no legend)")

end_vcontext()