I was trying to make a plot showing how many genes with functional annotations are present across my pipeline and connect the dots to show the connection between different boxplot and geom jitter.
But then I got stuck where the lines wouldn't connect to the dots because the position_jitter was somehow different.
The original code was:
tt %>%
left_join(phylo %>% select(!NCBI_TaxID), by=c("Genome"="ID")) %>%
filter(Order %in% c("Bacillales","Enterobacterales","Flavobacteriales")) %>%
ggplot(aes(x=tool,y=n,col=Order,group=Genome))+