How to create a bar graph with scatter for two metrics across three conditions in R

Question

I want to create a somewhat complicated bar graph where I show data about how participants perceived 40 videos. I have a list of video data where the first 10 are categorised as