I would like to compare the performance by each host? Also by event name?
Tukey style box and whisker plots would be a good start. There are too few data points here to be meaningful but you get the idea.
If you do do this it would be great to see the plots for you big data set, so if you can please post the results back here.
df <- data.frame(
stringsAsFactors = FALSE,
time_stamp = c(
"2018-11-08 07:42:11",
"2018-11-08 07:42:55",
"2018-11-08 07:43:41",
"2018-11-08 07:44:07",
"2018-11-08 07:44:57",
"2018-11-08 07:45:44",
"2018-11-08 07:46:28",
"2018-11-08 07:47:20",
"2018-11-08 07:47:56",
"2018-11-08 07:48:48"
),
host_name = c(
"host1",
"host2",
"host2",
"host3",
"host2",
"host5",
"host5",
"host3",
"host3",
"host1"
),
event_name = c(
"save",
"upload",
"render",
"upload",
"save",
"save",
"render",
"upload",
"upload",
"render"
),
event_type = c(
"STOP",
"STOP",
"STOP",
"STOP",
"STOP",
"STOP",
"STOP",
"STOP",
"STOP",
"STOP"
),
time_task = c(
"25.8089997768402",
"40.319000005722",
"42.9910001754761",
"24.6840000152588",
"46.1050000190735",
"44.2489998340607",
"41.2440001964569",
"49.4800000190735",
"33.7000000476837",
"49.0550000667572"
),
task_id = c(
"00390eee-c26c-41da-a02d-556bb7fcac67",
"dbc599f6-694b-46c4-a864-e09ab881af37",
"0ad8d29d-d30c-48c9-bd0a-fbea985464b2",
"52881801-4d75-4ada-a118-682aa1d5ddf9",
"5c14d761-26af-4602-a51d-6378a4ad7c24",
"fa8d5709-ffb6-4a8b-bd73-0076c1654d49",
"0ebfe158-0c86-4cde-8742-20d13cc4076b",
"403c1ca4-f5d3-4831-8a66-0f8be10f5aeb",
"ffd69831-0ba4-457b-b8a8-e37c49779d94",
"70a9ab55-b17f-4df6-82ef-146425d7bbfa"
)
)
df$time_stamp <-
as.numeric(as.POSIXct(df$time_stamp, format = "%Y-%m-%d %H:%M:%OS"))
df$time_task <- as.numeric(df$time_task)
library(ggplot2)
library(magrittr)
df %>% ggplot(aes(host_name, time_task)) +
geom_boxplot()

df %>% ggplot(aes(event_name, time_task)) +
geom_boxplot()

# You can also control the display of dots and outliers
df %>% ggplot(aes(x = event_name, y = time_task)) +
geom_boxplot(
outlier.colour = "red",
outlier.shape = 16,
outlier.size = 2
) +
geom_dotplot(binaxis = "y",
stackdir = "center",
dotsize = 0.5)
#> `stat_bindot()` using `bins = 30`. Pick better value with `binwidth`.

Created on 2019-01-15 by the reprex package (v0.2.1)