ggplot2创建不同的输出然后在线示例

Question

简单的图表不会产生预期的数字。

作为示例，我使用以前post中的以下代码：

library(ggplot2)
a <- seq(1,20)
b <- a^0.25
df <- data.frame(cbind(a,b))

ggplot(df, aes(x = a, y = b)) + geom_point() +
  theme_bw() +
  theme(axis.line = element_line(colour = "black"),
        panel.grid.major = element_blank(),
        panel.grid.minor = element_blank(),
        panel.border = element_blank(),
        panel.background = element_blank()) 

这应该产生：

但产生：

如何找到gglopt2没有产生预期图的原因？

ggplot的版本：

> packageVersion("ggplot2")
[1] ‘2.1.0’

R版本：

> version
               _                           
platform       x86_64-w64-mingw32          
arch           x86_64                      
os             mingw32                     
system         x86_64, mingw32             
status                                     
major          3                           
minor          2.1                         
year           2015                        
month          06                          
day            18                          
svn rev        68531                       
language       R                           
version.string R version 3.2.1 (2015-06-18)
nickname       World-Famous Astronaut