简单的R功能，有什么不对？

Question

我的代码如下，我的代码没有问题。我想返回ggplot对象，但是在“return”行出现意外错误，如果我删除那个，我会在}符号处出现意外错误。

有什么问题？

pgraf <- function () {

  library(ggplot2)
  library(gcookbook)

  p <- ggplot(cabbage_exp, aes(Date, Weight, fill = Cultivar) + 
                geom_bar(stat="identity", position = "stack", color = "black") + 
                geom_text(aes(label=Weight) , vjust=0.1)

  return (p)

}

Answer 1

您在ggplot调用的第一行中错过了一个结束括号..

p <- ggplot(cabbage_exp, aes(Date, Weight, fill = Cultivar)**)** + 

试一试。