myData <- read.csv("/Users/takeru/Desktop/PSU_DAT3000_IntroToDA/00_data/myData.csv")
myData %>% ggplot(aes(language)) + geom_bar()