7

私のコードまたは binwidth を動作させる方法についての考えをいただければ幸いです。私のデータセットには、数時間ごとに「4」、毎日「24」収集されたタイムスタンプ付きのデータポイントが含まれています。左側に 4 時間の積み上げヒストグラム、右側に 24 時間の積み上げヒストグラムをプロットしようとしています。したがって、右側のビン幅を左側のビン幅よりも 6 倍広くしたいと考えています。しかし、binwidth で試したことはすべてうまくいきませんでした。x 軸のデータ data3$dts は連続的で離散的ではないように見えますが、おそらく私はそれを正しく行っていません。

データに関する重要な注意事項: 右側にグラフ化されたデータ (hours=24 データ) には、常に整数の dts 値があります。左側のデータ、hours=4 データには、整数以外の dts 値があります。

             "dts"  "Yes" "No" "Maybe" "hours"  "days"
"258"   15627.668   8       0   1       4   "7 Days"
"259"   15627.832   13      11  18      4   "7 Days"
"260"   15628       34      47  89      4   "7 Days"
"261"   15628       37      47  90      24  "7 Days"
"262"   15628.168   3       0   1       4   "7 Days"
"40"    15571       345     419 674     24  "90 Days"
"41"    15571.5     91      145 130     4   "90 Days"
"42"    15571.668   158     149 284     4   "90 Days"
"43"    15571.832   96      125 260     4   "90 Days"
"44"    15572       55      33  137     4   "90 Days"
"45"    15572       1050    1119 2660   24  "90 Days"

ペーストビンから取得したデータを含むコード:

library (ggplot2)
library (scales)
library(grid)
library(gridExtra)

color3 <- c("mediumspringgreen","red","grey44")
titles.days <-  c( "7 Days", "90 Days") 
names.facetby <- c ("dts", "hours", "days")

data3 <- read.table ("http://pastebin.com/download.php?i=wUQQUXP4", header=TRUE)
data3.melt <- melt (data3 , id = names.facetby )   
data3.melt$days <- factor (data3.melt$days, levels = titles.days)   #  put the factor in the right order, so the graphs are in the right order

 a <- ggplot     ( data3.melt 
        , aes (       x =  dts  #as.Date( dts , date1970) 
                , y =  value 
                , fill = variable)) +
        opts (axis.text.x=theme_text(angle=0, hjust=1)) +
        scale_fill_manual(values = color3) +
        scale_x_date(labels = date_format("%m/%d\n    %a") ) +
        geom_histogram (stat = "identity", position = "stack", binwidth=6.2) +  
        facet_wrap( days ~ hours, ncol=2, scales="free")            

print(a)        

ビン幅が狭すぎる右側のグラフを示す現在の結果:

ここに画像の説明を入力

4

2 に答える 2

1

ビンは実際には同じ幅です。違いは、90 日プロットにはより多くのビンがあるためです。

scales="free_y"に設定することでこれを見ることができますfacet_wrap

また、探していることを実行するための潜在的な手法について説明しているこの投稿もご覧ください。

于 2012-10-19T14:12:47.877 に答える