Я работаю с набором данных, в котором образцы мхов и печеночника взяты по высотному градиенту. Было отобрано 11 высот между 350 м и 2750 м, каждые 200 м.
Ареал вида определяется как высоты между минимальной и максимальной высотой, на которых вид был зарегистрирован. В своем размышлении я предположил, что вид, который был зарегистрирован между двумя разными высотами, также присутствовал между этими двумя высотами.
Чтобы проверить это, я ищу виды, зарегистрированные в пределах наблюдаемого диапазона, но не между . Если вид присутствует на определенной высоте между пределами ареала, но не каждый, это не проблема, я ищу только те виды, которые отсутствуют на каждой высоте между максимальной и минимальной. Чтобы проиллюстрировать это, в моем выводе будет выбран только AEROSUBPM, а не ANASAURI.
Я надеюсь, что я был достаточно ясен в своем объяснении. Вот вывод данных о присутствии / отсутствии, только с двумя переменными, названиями видов и высотами.
> PA_brk%>%
+ dplyr::select(1:6)%>%
+ slice(1:10)%>%
+ dput()
structure(list(alti = c(350, 550, 750, 950, 1150, 1350, 1550,
1750, 1950, 2150), ACROEMER = c(0L, 0L, 0L, 1L, 0L, 0L, 0L, 0L,
0L, 0L), ACROMEGA = c(0, 1, 1, 1, 1, 0, 1, 0, 0, 0), AEROSUBPM = c(0,
1, 0, 1, 0, 0, 0, 0, 0, 0), AMAZDIPL = c(0, 0, 0, 0, 1, 0, 0,
0, 0, 0), ANASAURI = c(0, 0, 1, 0, 0, 0, 1, 0, 1, 0)), row.names = c(NA,
-10L), class = "data.frame")
Думаю, есть способ сделать то, что я хочу, используя условия как "if_else" но я пытался и действительно потерялся в своем размышлении, поэтому некоторая помощь была бы действительно полезной.