add airports visualization example in R