ジグの区切りとラベルがggplot2で混乱の原因となる

Question

下の例をプロットすると、2008年と2012年のティックが2008.5と20012.5であるため、x軸のラベルが混乱します。私は手を加えて、数字の書式が長すぎるので切り捨てられることに気づいた。ダニとラベルを塗りつぶすにはどうすればいいですか？

library(ggplot2) 
foo <- data.frame(x=2005:2014,y=rnorm(10)) 
p1 <- ggplot(data = foo, aes(x = x, y = y)) 
p1 <- p1 + geom_point(size=4) 
p1 

EDIT： How to display only integer values on an axis using ggplot2

私の謝罪：これは確かに重複して質問です。

Answer 1

この2つのオプションがアイデアかもしれない....

オプション1：

foo <- data.frame(x=2005:2014,y=rnorm(10)) 
    p1 <- ggplot(data = foo, aes(x = x, y = y)) 
    p1 <- p1 + geom_point(size=4) 
    p1 <- p1 + scale_x_continuous(breaks = foo$x) 
    p1 

オプション2：

foo <- data.frame(x=2005:2014,y=rnorm(10)) 
    p1 <- ggplot(data = foo, aes(x = x, y = y)) 
    p1 <- p1 + geom_point(size=4) 
    p1 <- p1 + scale_x_continuous(breaks = foo$x[seq(1, length(foo$x), 2)]) 
    p1