6

ベース R はパーセンテージを報告しないためhist()(および freq=FALSE も役に立たない)、私はlattice.

histogram(rnorm(10000))

次のことで私を助けてください:

  1. プロットの周りのボックスを取り除くにはどうすればよいですか?
  2. x/y ラベルと x/y 軸の cex を個別に定義するにはどうすればよいですか?
  3. x 軸と y 軸にカスタム名を付けるにはどうすればよいですか?
4

2 に答える 2

6

または、 に固執したい場合はhist()、以下に示すように、わずかに変更できます。

この関数はhist()、ヒストグラムの構造に関するあらゆる種類の有用な情報を含むオブジェクトである戻り値を取得するために 1 回呼び出します。次に、(a) ビンの幅と (b) 各バーの密度を使用して、(c) 各バーに含まれる観測値のパーセンテージを計算します。

histPercent <- function(x, ...) {
   H <- hist(x, plot = FALSE)
   H$density <- with(H, 100 * density* diff(breaks)[1])
   plot(H, freq = FALSE, ...)
}

histPercent(rnorm(10000), col="dodgerblue", las=1,
            xlab="Echs-axis", ylab="Why-axis")

ここに画像の説明を入力

于 2012-01-31T17:17:45.210 に答える
5

これで始められるはずです:

library(lattice)
histogram(rnorm(10000),     
    main=list(
        label="Main plot title",
        cex=1.5),
    xlab=list(
        label="Custom x-axis label",
        cex=0.75),
    ylab=list(
        label="My very own y-axis label",
        cex=1.2),
    scales=list(cex=0.5),
    par.settings = list(axis.line = list(col = 0))
)

ここに画像の説明を入力

于 2012-01-31T15:23:37.517 に答える