ggplot & plyr test 0