ヒストグラムの格子

Question

ベースRのhist()はパーセンテージを報告していません（そしてfreq = FALSE）も役に立たないので、私はlatticeになりました。

histogram(rnorm(10000)) 

次で私を助けてください：

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

Answer 1

これはあなたが始める必要があります。

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)) 
) 

Answer 2

それとも、あなたは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")