seq() с несколькими приращениями
Я хотел бы создать последовательность с тремя различными вариантами. С 6 до 15 например прирост 0,7 . Следующая последовательность должна начинаться с последнего номера предыдущей последовательности (в данном случае 14.4). Этим я хочу смоделировать прирост диаметра дерева в зависимости от класса диаметра (малый 6-14,99; средний 15 - 29,99; большой>30).
dbh <- c(seq(from = 6, to = 15, by = temp$DBH_growth[temp$dbh_class == "sma"]),
seq(from = 15, to = 30, by = temp$DBH_growth[temp$dbh_class == "med"]),
seq(from = 30, to = 300, by = temp$DBH_growth[temp$dbh_class == "big"]))
Как этот код, но начиная с последнего номера последовательности перед.
1 ответ
Что-то вроде этого
sma <- seq(6, 15, .7)
med <- seq(max(sma), 30, 1)
lar <- seq(max(med), 300, 1.4)
dbh <- c(sma, med, lar)
если предположить, что .7,1,1.4
это приращения для малого, среднего, большого соответственно или в вашем случае
sma <- seq(6, 15, temp$DBH_growth[temp$dbh_class == "sma"])
med <- seq(max(sma), 30, temp$DBH_growth[temp$dbh_class == "med"])
lar <- seq(max(med), 300, temp$DBH_growth[temp$dbh_class == "big"])
dbh <- c(sma, med, lar)