Aggregate function in r is not working on my dataset -

-

sample dataset

date   playerid    revenue promo   dayofweek 01/01/2017  146123  0   b   sunday 01/01/2017  219378  0   b   sunday 01/01/2017  198614  0   b   sunday 02/01/2017  292640  30    monday 02/01/2017  139562  10    monday 02/01/2017  124967  20    monday 02/01/2017  107954  20    monday 03/01/2017  28391   10  b   tuesday 03/01/2017  184388  21  b   tuesday 03/01/2017  264222  20  b   tuesday 03/01/2017  184857  0   b   tuesday 04/01/2017  79788   40    wednesday

i wanted aggregate table dayofweek, , sum revenue each day of week, count number of players using playerid such final output looks this:

  players revenue promo   dayofweek     3      0      b       sunday     4     80            monday     4     51      b       tuesday     1     40            wednesday

i have been trying aggregate dataset attached above attempts unsuccessful. can help, please?

here code below.

aggdata <-aggregate(mydata, by=list(dayofweek,revenue, promo, playerid),                      fun=sum, na.rm=true)

i got following errors

error in fun(x[[i]], ...) : invalid 'type' (character) of argument

dplyr approach

library(dplyr) ans <- df %>%   group_by(dayofweek) %>%   summarise(promo=unique(promo), revenue=sum(revenue), playerid=n())

output

  dayofweek promo revenue playerid       <chr> <chr>   <int>    <int> 1    monday          80        4 2    sunday     b       0        3 3   tuesday     b      51        4 4 wednesday          40        1

data

df <- structure(list(date = c("01/01/2017", "01/01/2017", "01/01/2017",  "02/01/2017", "02/01/2017", "02/01/2017", "02/01/2017", "03/01/2017",  "03/01/2017", "03/01/2017", "03/01/2017", "04/01/2017"), playerid = c(146123l,  219378l, 198614l, 292640l, 139562l, 124967l, 107954l, 28391l,  184388l, 264222l, 184857l, 79788l), revenue = c(0l, 0l, 0l, 30l,  10l, 20l, 20l, 10l, 21l, 20l, 0l, 40l), promo = c("b", "b", "b",  "a", "a", "a", "a", "b", "b", "b", "b", "a"), dayofweek = c("sunday",  "sunday", "sunday", "monday", "monday", "monday", "monday", "tuesday",  "tuesday", "tuesday", "tuesday", "wednesday")), .names = c("date",  "playerid", "revenue", "promo", "dayofweek"), row.names = c(na,  -12l), class = c("data.table", "data.frame"))

Comments

Post a Comment

Popular posts from this blog

ios - MKAnnotationView layer is not of expected type: MKLayer -

-
Image
so code works fine logger riddled message. there way rid of or suppress it? postannotation.swift class postannotation: mkpointannotation { //mark: properties let post: post //mark: initialization init(post: post) { self.post = post super.init() self.coordinate = cllocationcoordinate2d(latitude: post.latitude, longitude: post.longitude) self.title = post.title self.subtitle = post.timestring() } } adding annotation let annotation = postannotation(post: post) self.map.addannotation(annotation) func mapview func mapview(_ mapview: mkmapview, viewfor annotation: mkannotation) -> mkannotationview? { if annotation mkuserlocation { return nil } var annotationview = mapview.dequeuereusableannotationview(withidentifier: "pin") as? mkpinannotationview if annotationview == nil { annotationview = mkpinannotationview(annotation: annotation, reuseidentifier: "pin")
Read more

ZeroMQ on Windows, with Qt Creator -

-
i have installed zmq link given below on windows 7. http://zeromq.org/distro:microsoft-windows 1) have c++ project in qt-creator , i'm using zmq c++ binding (zhelpers.hpp etc). 2) have added .lib installed zmq folder qtcreator 3) while compiling, compiler looks _imp__zmq_verion, in .dll files present in .lib have __imp_zmq_version. 4) causing undefined reference zmq_version. anyone else faced problem , has solution ?
Read more

unity3d - Unity SceneManager.LoadScene quits application -

-
i have 2 different scenes 1 named 'main' , other 'game' both added scenes in load. when use scenemanager.loadscene("game"); works no problem when tried return main scene code if (input.getkeydown (keycode.escape)) { scenemanager.loadscene("main"); } strangely game quits. thanks. sorry interruption. somewhere on other script found code. if (input.getkeydown (keycode.escape)) { application.quit (); } that's bad, know...
Read more