Try this. You want to pivot the "Camp" columns so there's a new column with values "Camp_1", "Camp_2", ...and a new column with values 0, 1, ...
It's a lot more powerful to work with data in this long format.
Take a look at the intermediate result after the pivot_longer command.
library(tidyverse)
df %>%
pivot_longer(starts_with("Camp")) %>%
ggplot() +
aes(name, value) +
geom_point()