in chap7 's code, line 42:
Error in round_any(movies$year, 10, floor) : 找不到对象'movies'.
查了一下movies数据集应该在ggplot2里，但我加载了后还是报错。。。
####### 图7.3 每十年电影平均评分的分布。
movies$decade <- round_any(movies$year, 10, floor)
####### round_any() 需要加载 plyr 包
qplot(rating, ..density.., data = subset(movies, decade > 1890), geom = "histogram",
binwidth = 0.5) + facet_wrap(~decade, ncol = 6)
in chap7 's code, line 42:
Error in round_any(movies$year, 10, floor) : 找不到对象'movies'.
查了一下movies数据集应该在ggplot2里，但我加载了后还是报错。。。
####### 图7.3 每十年电影平均评分的分布。
movies$decade <- round_any(movies$year, 10, floor)
####### round_any() 需要加载 plyr 包
qplot(rating, ..density.., data = subset(movies, decade > 1890), geom = "histogram",
binwidth = 0.5) + facet_wrap(~decade, ncol = 6)