p=ggplot(diamonds,aes(carat,price,colour=cut))
p<-p + layer(geom = "point")

错误: Attempted to create layer with no stat.
请问是怎么回事？