我正在尝试从以下论文(http://dx.doi.org/10.1016/j.envsci.2011.08.004)复制图表图 1 的概念:
它是一个直方图,其 bin 宽度取决于 的值而变化x
,其高度取决于 variable y
。图表中的精确值无关紧要 - 而是了解如何重现它。
下面的代码为每个创建一个具有两个特征 (abatement
和cost
)的数据框measure
。的宽度measure
是减排量,高度measure
是成本。measure
应该从最低成本到最高成本进行排序。
measure <- c(LETTERS)
abatement <- c(sample(1:100, 26))
cost <- c(sample(-100:250, 26))
data <- data.frame(cbind(measure, abatement, cost))