#how do i get rid of the blank columns in the faceting?
tidy_tibble %>%
ggplot() +
aes(x = calculation,
y = value) + #assign x and y axis, add grouping
geom_col(fill = "blue2") + #make bar plot
facet_grid(~ test_type) + #add faceting
theme_bw() #change theme