Is there a way to get the aspect ratio as output from a plot() call or something similar in the base graphics system? I would like to note vertical exaggeration on an elevation profile. Thanks, Scott Waichler Pacific Northwest National Laboratory scott.waichler at pnl.gov
How to get aspect ratio as output from from plot()
2 messages · Waichler, Scott R, Sundar Dorai-Raj
Waichler, Scott R wrote:
Is there a way to get the aspect ratio as output from a plot() call or something similar in the base graphics system? I would like to note vertical exaggeration on an elevation profile. Thanks, Scott Waichler Pacific Northwest National Laboratory scott.waichler at pnl.gov
Hi, Scott,
Perhaps this will work for you?
plot(1:10)
w <- par("pin")[1]/diff(par("usr")[1:2])
h <- par("pin")[2]/diff(par("usr")[3:4])
asp <- w/h
HTH,
--sundar