-- Start writing your SQL query here SELECT * from countries
library(tidyverse) area<-df%>%select(name,area)%>%arrange(desc(area))%>%top_n(5,area) ggplot(area,aes(name,area))+geom_col()