Я учусь на данных eBird, чтобы в конечном итоге попытаться составить географическую карту численности птиц в зависимости от расположения электростанций, работающих на угле. Я - начинающий пользователь R, поэтому заранее прошу прощения за неправильное форматирование вопросов и за любые базовые c вопросы, которые я могу задать.
Мой вопрос был создан после просмотра Найти широту / долготу в радиусе от известная центрированная точка в R . Это код, который я сгенерировал, посмотрев на связанный вопрос и ответ от @alistaire
geo_filtered_data <- my_fulldata %>% filter(latitude < 41.4167 & latitude > 35.35 & longitude > -92.5 & longitude < -88.1667)
coord <- cbind(geo_filtered_data$longitude, geo_filtered_data$latitude)
#Rush Island Power Plant: Lat = 38.126862, Long = -90.284332
#New Madrid Power Plant: Lat = 36.513599, Long = -89.574959
#Sioux Energy Center: Lat = 38.915840, Long = -90.290940
#Meramec Power Plant: Lat = 38.404560, Long = -90.340721
coord_within_5km <- data.frame(coord,
within_5km = geosphere::distHaversine(
coord,
c(-90.284332, 38.126862)) / 1000 < 5)
table(coord_within_5km$within_5km)
Затем я отфильтровал данныеordin_within_5k, чтобы включить только ИСТИННЫЕ точки
coord_within_5km <- coord_within_5km %>% filter(within_5km == TRUE)
Как я могу отредактируйте код, чтобы найти точки в пределах 5 км от каждой включенной мной координаты точки питания. Я рассматриваю таблицу со столбцом для каждой центральной координаты и точками, которые находятся в пределах желаемого расстояния, перечисленными в соответствующем столбце.