search for: speed_vehicles

...FUN = weighted.mean, w = n_vehicles)) Hope this helps, Rui Barradas Em 09-11-2017 13:16, Massimo Bressan escreveu: > Hello > > an update about my question: I worked out the following solution (with the package "dplyr") > > library(dplyr) > > mydf%>% > mutate(speed_vehicles=n_vehicles*mydf$speed) %>% > group_by(date_time,type) %>% > summarise( > sum_n_times_speed=sum(speed_vehicles), > n_vehicles=sum(n_vehicles), > vel=sum(speed_vehicles)/sum(n_vehicles) > ) > > > In fact I was hoping to manage everything in a "one-go": i.e....

hi all I have this dataframe (created as a reproducible example) mydf<-structure(list(date_time = structure(c(1508238000, 1508238000, 1508238000, 1508238000, 1508238000, 1508238000, 1508238000), class = c("POSIXct", "POSIXt"), tzone = ""), direction = structure(c(1L, 1L, 1L, 1L, 2L, 2L, 2L), .Label = c("A", "B"), class =

Hello an update about my question: I worked out the following solution (with the package "dplyr") library(dplyr) mydf%>% mutate(speed_vehicles=n_vehicles*mydf$speed) %>% group_by(date_time,type) %>% summarise( sum_n_times_speed=sum(speed_vehicles), n_vehicles=sum(n_vehicles), vel=sum(speed_vehicles)/sum(n_vehicles) ) In fact I was hoping to manage everything in a "one-go": i.e. without the need to create the &quot...

...> To: r-help <r-help at r-project.org> > Subject: Re: [R] weighted average grouped by variables > > Hello > > an update about my question: I worked out the following solution (with the > package "dplyr") > > library(dplyr) > > mydf%>% > mutate(speed_vehicles=n_vehicles*mydf$speed) %>% > group_by(date_time,type) %>% > summarise( > sum_n_times_speed=sum(speed_vehicles), > n_vehicles=sum(n_vehicles), > vel=sum(speed_vehicles)/sum(n_vehicles) > ) > > > In fact I was hoping to manage everything in a "one-go": i.e....

...t;https://www.inbo.be> 2017-11-09 14:16 GMT+01:00 Massimo Bressan <massimo.bressan at arpa.veneto.it>: > Hello > > an update about my question: I worked out the following solution (with the > package "dplyr") > > library(dplyr) > > mydf%>% > mutate(speed_vehicles=n_vehicles*mydf$speed) %>% > group_by(date_time,type) %>% > summarise( > sum_n_times_speed=sum(speed_vehicles), > n_vehicles=sum(n_vehicles), > vel=sum(speed_vehicles)/sum(n_vehicles) > ) > > > In fact I was hoping to manage everything in a "one-go": i.e....

...>> Subject: Re: [R] weighted average grouped by variables >> >> Hello >> >> an update about my question: I worked out the following solution (with the >> package "dplyr") >> >> library(dplyr) >> >> mydf%>% >> mutate(speed_vehicles=n_vehicles*mydf$speed) %>% >> group_by(date_time,type) %>% >> summarise( >> sum_n_times_speed=sum(speed_vehicles), >> n_vehicles=sum(n_vehicles), >> vel=sum(speed_vehicles)/sum(n_vehicles) >> ) >> >> >> In fact I was hoping to manage eve...