ggplot2代码报unexpected symbol错误，请求修复方法

报错的核心原因是代码中把线性模型函数名lm（小写字母L+m）误写成了1m（数字1+m），R无法识别这种非法的符号组合，因此抛出语法错误。

修复后的代码如下：

ggplot(quartet, aes(x,y)) + 
    geom_point() + 
    geom_smooth(method=lm, se=FALSE) + 
    facet_wrap(~set)

另外，也可以将method参数指定为字符串形式，写法如下，效果完全一致：

ggplot(quartet, aes(x,y)) + 
    geom_point() + 
    geom_smooth(method="lm", se=FALSE) + 
    facet_wrap(~set)

内容的提问来源于stack exchange，提问作者Guest