Import data

myData <- read.csv("/Users/takeru/Desktop/PSU_DAT3000_IntroToDA/00_data/myData.csv")

Plot prices

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