r - 如何从圆圈中的多个角度计算最常见的鸟类飞行方向？

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))

你需要更复杂的东西吗？