#1(1)library(ggplot2)data.frame(airquality)#1(2)table(is.na(airquality))#1(3)library(dplyr)na.omit(airquality)#1(4)mean_Ozone= 2)top_10 % arrange(desc(freq)) %>% head(10)top_10#2(2)set.seed(1234)pal %filter(type=='일반대학')%>% select(type,name, addr)df_seoul$name % filter(sido=="서울") %>% select(gu, nu)df_new % group_by(gu) %>%summarise(size=sum(nu))register_google(key="AIzaSyCXlhbvnsmrikXm5Rmd8NZR7..