A/B Testing in R
Lauryn Burleigh
Data Scientist
Visualizes:
library(dplyr) data <- pizza %>% group_by(Topping) %>%
summarise(AvgTime = mean(Time), SdTime = sd(Time))
data
# A tibble: 2 × 3
Topping AvgTime SdTime
<chr> <dbl> <dbl>
1 Cheese 5.81 0.948
2 Pepperoni 6.46 1.06
library(ggplot2)
ggplot(data, aes(x = Topping,
y = AvgTime,
fill = Topping)) +
geom_bar(stat = "summary", fun = "mean") +
geom_errorbar(aes( ymin = AvgTime - SdTime, ymax = AvgTime + SdTime))
ggplot(pizza, aes(x = Topping, y = Time, fill = Topping)) +
geom_boxplot()
library(ggplot2) ggplot(pizza, aes(x = Time, y = Enjoyment, fill = Topping)) +
geom_point()
ggplot(subset(pizza,
Topping %in%
"Pepperoni"),
aes(x = Time, y = Enjoy)) +
geom_point()
Audience has no statistics background:
Results:
Presentation:
A/B Testing in R