2

次の論文 ( http://dx.doi.org/10.1016/j.envsci.2011.08.004 )からチャート図 1 の概念を複製しようとしています。

ここに画像の説明を入力

xこれは、ビンの幅が の値に応じて変化し、高さが variable に応じて変化するヒストグラムですy。グラフの正確な値は重要ではありません。むしろ、それを再現する方法を理解する必要があります。

abatement次のコードは、それぞれに 2 つの特性 (および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))
4

2 に答える 2

3

技術的に言えば、これはバープロットであり、ヒストグラムではありません (ヒストグラムは、連続変数のビン化された頻度を表すために使用されるバープロットを特に参照します) ...

あなたcbind()は物事を台無しにしています（変換abatementとcost要因への変換）：

data <- data.frame(measure, abatement, cost)

ここから始めましょう:

with(dplyr::arrange(data,cost),
     barplot(width=abatement,height=cost,space=0))
于 2015-04-27T16:49:37.917 に答える