Question

我有一个数据框，其中包含人员参考列表，然后是交易，每个人参考可以有多个交易。我想聚合，以便显示如下数据：

Record Person Ref       Trade Code
1        512       elec, plumbing, gas
2        654            gas, plumbing
3        685              elec

等等。

我目前的代码是：

TEST<-aggregate(`Trade Code`~`Person Reference`, df, function(test)
      paste(names(table(test)[rank(-1*table(test),ties.method="min")==1],collapse=NULL))

出现错误：

> Error: unexpected symbol in: "TEST<-aggregate('Trade Code'~'Person
> Reference', age_arr, function(test)
> paste(names(table(test)[rank(-1*table(test),ties.method="min")==1],collapse=NULL))
> View"

任何人都可以看到我出错的地方吗？

Answer 1

您可以使用toolbox.router.get('/js/*', toolbox.cacheFirst, {cache : {name : cacheMap.js, maxEntries: 5}}); toolbox.router.get('/views/partials/practice/*', toolbox.cacheFirst, {cache : {name : cacheMap.html, maxEntries: 5}});和dplyr：

执行此操作

toString

聚合字符/字符串变量

1 个答案: