R 如何避免错误：‘；总和’；没有意义的因素？

最近，我编写了一个函数来获取未采样的google analytics数据，遇到了一些问题：

原始功能：

library(RGA)



brows<-get_ga(profile.id="",
          start.date= "2015-08-20", 
          end.date= "2015-08-23",
          metrics = "ga:sessions", 
          dimensions = "ga:browser,ga:date", 
          sort="ga:date",
          filters="ga:browser==Safari,ga:browser==Chrome,ga:browser==Internet Explorer,ga:browser==Firefox",
          segment=NULL,
          start = 1, 
          max = NULL)

dates <- seq(as.Date("2015-08-20"), as.Date("2015-08-23"), by = "days")

modified <- aggregate(. ~date, FUN = sum,
data = do.call(rbind, lapply(dates,
function(date) {get_ga(profile.id = "", 
                   start.date = date, 
                   end.date = date,
                   metrics = "ga:sessions",
                   dimensions = "ga:browser,ga:date",
                   sort="ga:date",
                   filters="ga:browser==Safari,ga:browser==Chrome,ga:browser==Internet Explorer,ga:browser==Firefox",
                   segment=NULL,
                   start = NULL, 
                   max = NULL)})))

为了避免采样数据，修改后的函数按天聚合数据。它很好用。现在我得到了

错误

Error in Summary.factor(1:4, na.rm = FALSE) : 
  ‘sum’ not meaningful for factors

---

我知道一定有一个因素。但是，我不太确定在哪里扩展我的

聚合

函数，以便将

作为.numeric

函数从哪里来

获取_ga

？@Pascal…对不起，最重要的问题库（RGA）在从ga加载数据后，将其保存在某个地方（比如

res

）。然后运行

indx@David谢谢你的建议。然而，问题在于加载GA数据，这通常是由
修改后的
函数本身完成的。我仍然不明白你的意思。你能给出一个更好的例子吗？为什么你不能修改函数，你的输入是什么，期望的输出是什么？