Take a look at the dataset
dplyr::glimpse(listings)
#> Rows: 48,895
#> Columns: 15
#> $ list_id <dbl> 2539, 2595, 3647, 3831, 5022, 5099, 5121, 5178, 52…
#> $ list_description <chr> "Clean & quiet apt home by the park", "Skylit Midt…
#> $ host_id <dbl> 2787, 2845, 4632, 4869, 7192, 7322, 7356, 8967, 74…
#> $ host_name <chr> "John", "Jennifer", "Elisabeth", "LisaRoxanne", "L…
#> $ neighbourhood_group <chr> "Brooklyn", "Manhattan", "Manhattan", "Brooklyn", …
#> $ neighbourhood <chr> "Kensington", "Midtown", "Harlem", "Clinton Hill",…
#> $ lat <dbl> 40.64749, 40.75362, 40.80902, 40.68514, 40.79851, …
#> $ lon <dbl> -73.97237, -73.98377, -73.94190, -73.95976, -73.94…
#> $ room_type <chr> "private room", "entire room", "private room", "en…
#> $ price <dbl> 149, 225, 150, 89, 80, 200, 60, 79, 79, 150, 135, …
#> $ min_nights <dbl> 1, 1, 3, 1, 10, 3, 45, 2, 2, 1, 5, 2, 4, 2, 90, 2,…
#> $ reviews <dbl> 9, 45, 0, 270, 9, 74, 49, 430, 118, 160, 53, 188, …
#> $ last_review_date <date> 2018-10-19, 2019-05-21, NA, 2019-07-05, 2018-11-1…
#> $ reviews_per_month <dbl> 0.21, 0.38, NA, 4.64, 0.10, 0.59, 0.40, 3.47, 0.99…
#> $ available_days <dbl> 365, 355, 365, 194, 0, 129, 0, 220, 0, 188, 6, 39,…