Changing the set labels in an upset plot - rid of the underscore in the set names

Question

I have looked at the previous answer to this question and tried to create a list input but it didn't work. This is my code and it makes a lovely upset plot but the reviewer has asked for the underscore to be removed from the labels. I went back to the CSV file and removed the underscore but I ended up with full stops in place of underscores. Is there a way to relabel the set names?

upset(Services, sets = c("Sleep_Problems", "Lack_Exercise", "Oppositional_Behaviour", 
                       "Social_Withdrawal", "Excessive_Gaming", 
    "Online_Bullying", "Task_Difficulties", "None"), 
        point.size =4, font(size = 24),
       mb.ratio = c(0.55, 0.45), order.by = "freq", 
    mainbar.y.label = "Parents Perceptions of Child's Mobile Media Use \nNumber of Negative Experiences in Shared Categories", sets.x.label = "        Total for Each Negative Experience\n                                 for Child's Mobile Media Use (n=213; Missing = 16)",  
     text.scale = c(1.6, 1.2, 1.3,1.3, 1.7, 1.4),
   keep.order = FALSE)