ヒストグラムの棒をラベルの中心に合わせる

Question

レイアウト上の理由から、棒の真ん中がラベルの上になるように、ラベルの中央に配置したいと考えています。

library(ggplot2) 

df <- data.frame(x = c(0,0,1,2,2,2)) 

ggplot(df,aes(x)) + 
    geom_histogram(binwidth=1) + 
    scale_x_continuous(breaks=0:2) 

これは、これまでに見えるものである - バーの左側には、ラベルの上にある：

は、そのような方法で、与えられたスニペットを調整することは可能ですか？

Answer 1

（代わりにFXをgeom_barを使用せずに）これは、カテゴリx軸を必要としませんが、古いggplot2 1.

library(ggplot2) 

df <- data.frame(x = c(0,0,1,2,2,2)) 

ggplot(df,aes(x)) + 
geom_histogram(binwidth=1,boundary=-0.5) + 
scale_x_continuous(breaks=0:2) 

とは異なるビン幅を持っている場合は、あなたが少しをプレイしたいと思います（ < 2.1.0）、geom_histogram(binwidth=1, origin=-0.5)を使用してください。

Answer 2

あなたのy値を計算し、xをカテゴリx軸として使用し、geom_bar(stat="identity")を使用します。すぐ下

library(ggplot2) 
library(data.table) 

df = data.table(x = c(0,0,1,2,2,2)) 

df = df[, .N, by=x] 

p = ggplot(df, aes(x=factor(x), y=N)) + 
    geom_bar(stat="identity", width=1.0) 

ggsave("barplot.png", p, width=8, height=4, dpi=120) 

Answer 3

コードが動作するように使用されていないが、もはや。これは、ビンが均等に分割することができると仮定からggplotを防止する（今geom_hiustogramキャッチを::このごまかしをggplot2と異なる機能を使用することを提案した：

ggplot(df,aes(factor(x))) + 
    geom_histogram(binwidth=1) 
#Error: StatBin requires a continuous x variable the x variable is discrete. Perhaps you want stat="count"? 

ので、代わりに使用：

ggplot(df,aes(factor(x))) + 
    stat_count()