Ggplot无法由R运行？

我正在训练钻石套装，我不认为这是不可能的

ggplot(data = diamonds, mapping = aes(x = carat, y = price)) +
  geom_point()+
  geom_smooth(data = diamonds[diamonds$carat<3.1], method = 'lm', color ='red')

ggplot（数据=钻石，映射=aes（x=克拉，y=价格））+
几何点（）+
geom_smooth（数据=钻石[钻石$carat试试这个：

#Code
ggplot(data = diamonds, mapping = aes(x = carat, y = price)) +
  geom_point()+
  geom_smooth(data = diamonds[diamonds$carat<3.1,], method = 'lm', color ='red')

#代码
ggplot（数据=钻石，映射=aes（x=克拉，y=价格））+
几何点（）+
geom_smooth（数据=钻石[钻石$carat试试这个：

#Code
ggplot(data = diamonds, mapping = aes(x = carat, y = price)) +
  geom_point()+
  geom_smooth(data = diamonds[diamonds$carat<3.1,], method = 'lm', color ='red')

#代码
ggplot（数据=钻石，映射=aes（x=克拉，y=价格））+
几何点（）+
GeoMouSalk（数据=钻石[钻石，$CARATOLY…我看到我在那里做了什么。被困了一段时间，今天太多了。谢谢）：RunBoothug总是帮助你，如果你认为这个答案有帮助，考虑接受它。Kin说，你能指导我如何接受它吗？我今天点击了上面的箭头。“这个答案很有用”。我是新来的stackoverflow作为user@rainbowthug你可以找到有用的信息，你必须点击勾号，使其变成绿色。完成，谢谢：）天哪..我知道我在那里做了什么。被卡住了一段时间，今天太多了。谢谢：）“RunBoothug总是一种帮助你的乐趣，如果你认为这个答案有帮助，就考虑接受它吧。”Kin说，“你能告诉我如何接受它吗？”我今天点击了上面的箭头，上面写着“这个答案很有用”。“。我不熟悉stackoverflow作为user@rainbowthug您可以找到有关您必须单击勾号以使其变为绿色的有用信息。完成，谢谢：）