Displaying 1 result from an estimated 1 matches for "time_group".
Did you mean:
tid_group
2011 Oct 23
0
code review: is it too much to ask?
...)[names(throughput)=="Group.1"] <- "Time" # change column names
names(throughput)[names(throughput)=="Group.2"] <- "Partitioning"
names(throughput)[names(throughput)=="x"] <- "Y"
head(throughput)
samples = 9
throughput$Time_group <- floor(throughput$Time/samples) + 1 # generate Time groups of "samples"
dfc <- summarySE(throughput, measurevar="Y", groupvars=c("Time_group", "Partitioning"))
last <- length(dfc$Time)
dfc <- dfc[c(-1,-2,-(last-1),-last),]
dfc$Time <...