绘制固定的绘图区域

Question

我有一个简单的问题，我如何绘制固定高度的条形图，即拉伸绘图区域只改变边距而不是bararea，如下所示：

> A <- 4
> plot (A)

> barplot(A, col = "green4")

当我拉伸时，酒吧区域也会增加。

编辑：我想保持盒子大小不变，即使情节得到拉伸。

Answer 1

通过将屏幕分成多个部分，您可以部分实现：

split.screen(c(3,1))
A <- 4
barplot(A, col="green4")

Answer 2

您是否希望扩展y轴。 看看ylim ？

Answer 3

您可能正在寻找的是修复纵横比。 这可以使用asp实现：

barplot(A, col = "green4", asp = 1)

另见R-help的这篇文章 。

从更哲学的角度来看，当条形高度发生变化时，表面积没有变化。 barplot仅绘制一系列条形图，其中x轴是序数（有序分类）变量，这使得无法计算表面区域。 条形的高度是唯一变化的变量。 我建议使用简单的线图绘制这些时间序列。

所以代替：

a = runif(100)
b = 1:100
barplot(a)

采用：

plot(b, a, type = "l")

或切换到我最喜欢的绘图包， ggplot2 ：

require(ggplot2)
theme_set(theme_bw())
qplot(b, a, geom = "line")