收缩y轴宽度

Question

是否有可能缩小y轴？我的意思是代替图是方形的,我希望它是矩形的,y轴收缩.

library(ggplot2)
data = data.frame(rnorm(10000))
colnames(data) = "numOfX"
m <- ggplot(data, aes(x=numOfX))
m + geom_histogram(colour = "blue", fill = "white", binwidth = 0.5)

Answer 1

last_plot() + opts(aspect.ratio=1/10)