Import data

# excel file
myData <- read_excel("myData.xlsx")
View(myData)

Plot data

myData %>%
    
    ggplot(aes(artist_gender)) +
    geom_bar()