3

関数 histogram を使用して、データの密度をプロットしようとしています。データのサンプル形式は次のとおりです。

   library(lattice)
   index<-c(1,1,1,2,2,2,2)
   freq<-c(3,4,6,3,6,2,2)
   D<-data.frame(index,freq)
   histogram(~D$freq|D$index)

各ヒストグラムのストリップ テキストとしてインデックス番号を印刷したい (つまり、この例では、現在印刷されているのではなく、それぞれヒストグラムの上に 1 と 2 が表示されているD$index) が、それを行う簡単な方法がわかりません (私はstrip.custom()おそらく使用し、var.name適切に変更する必要があることを知っていますが、インデックスに従って反復する方法がわかりません)

4

2 に答える 2

4

インデックス変数を係数に変更すると、デフォルトの動作となるはずの動作が得られます。つまり、ストリップにシングル レベルが出力されます。

library(lattice)
    index<-factor(c(1,1,1,2,2,2,2))
    freq<-c(3,4,6,3,6,2,2)
    D<-data.frame(index,freq)
    histogram(~D$freq|D$index)

楽しみのために、strip.default のスタイル変数で遊ぶことができます。

histogram(~freq|index, data=D, strip = 
      function(..., style){ strip.default(..., style = 4)}  )
于 2011-05-10T20:34:28.257 に答える
2

作るindex_factor

index <- c(1,1,1,2,2,2,2)
freq <- c(3,4,6,3,6,2,2)
D <- data.frame(index=factor(index), freq)
histogram(~D$freq|D$index)

インデックス付きのヒストグラム

histogram(~freq|index, D)そして、ラティス関数を呼び出す方法を検討する方が良いでしょう。

于 2011-05-11T07:50:15.553 に答える