未找到Rddply对象错误

我在Shining server.R代码中遇到了ddply未找到对象的问题 这是我的

    a1<-read.table("orig_final.txt", header = T) 
    shinyServer(function(input, output) {
    data <- reactive({
    ddply(a1, .(Claim_type),here(summarize), size_in_GB sum(eval(parse(input$bygroup))))
    })
    })

输入$bygroup值来自名为bygroup的复选框组中的用户选择，其值是数据框a1中的列名。 我得到的错误是找不到对象输入

---

为什么不接受输入的$bygroup值？

您能提供更多上下文吗？shinyServer函数在哪里？下面是有关ddply调用位置的更多信息：Server.R code a1我无法回答我自己的问题，但这解决了问题：通过在解析中更改text=input$bygroup，实现了这一技巧。顺便说一下，当我没有在这里进行总结时，出现了错误Ojbect input not found，未找到不带text=的错误