Как я могу рассчитать наиболее распространенное направление полета птицы из нескольких углов в круге?

Question

Я рассчитываю наиболее распространенную траекторию полета птиц над заданным районом (аэропорт).Я знаю их положение (расстояние от меня) и угол их полета.Я нахожусь в определенной точке, и птицы летают вокруг меня.Я предполагаю, что все птицы летят по прямой линии.

Как я могу узнать, какой маршрут полета наиболее распространен в этом районе?

Пример углов полета:

direction <- c(35, 70, 300, 260, 340, 130, 240, 40, 190, 190, 150, 20)

Я нанес их на карту с учетом расстояния и угла от меня.Затем я добавил угол их полета и определил расстояние полета, чтобы увидеть траекторию полета (1,5 км).

Как вы можете видеть, это немного хаотично, но я хотел бы знать, если приблизительно птицы летают чаще в некотором диапазоне углов (20-30 °) или если это все случайно.

Answer 1

Достаточно ли простого количества точек данных для каждой категории? Вы можете использовать «вырезать», чтобы сделать это на основе категорий, которые вы определяете. Э.Г.

library(dplyr)
direction <- c(35, 70, 300, 260, 340, 130, 240, 40, 190, 190, 150, 20)
categoryBreaks <- c(0,20,40,60,80,100,120,140,160,180,200,220,240,260,280,300,320,340,360)

catDirection <- data.frame(direction) %>%
  arrange(direction) %>%
  mutate(category = cut(direction, categoryBreaks))

И заговор это:

ggplot(catDirection) +
  geom_bar(aes(category)) +
  xlab("Angle of Flight") +
  ylab("Count of birds") +
  theme_light() +
  theme(axis.text.x = element_text(angle = 90, hjust = 1))

Вам нужно что-то более сложное?

Answer 2

Есть много способов. Например, вы можете сравнить частоты: полеты в диапазоне 20-30 с другими диапазонами. Или, может быть, вы также можете выразить все полеты как расстояние от этого диапазона и построить график или искать корреляцию.