Применение цикла for к нескольким векторам

Я пытаюсь повторить цикл for, в котором вызываются 3 разных вектора. В частности, я пытаюсь посмотреть, сколько времени требуется различным сайтам, чтобы достичь своей пропускной способности. По сути, я хочу определить, сколько времени требуется разным популяциям, чтобы достичь своей несущей способности.

На данный момент я настроил его для успешной печати изобилия на разных временных шагах.

tspan <- 80
N <- matrix(0,tspan,1)
N[1] <- 20
K <- 13626
r <- 0.32

for (t in 2:tspan){
    N[t] <- N[t-1]*exp(r*(1-N[t-1]/K))
    print(N)
  }

Хотя даже это приводит к выводу одного и того же вектора, распечатанного N=tspan раз. Конечная цель здесь состоит в том, чтобы повторить описанный выше цикл for по вектору с разными значениями K:

K<-c(208, 543, 557, 831, 831, 878, 933, 970, 1022, 1039)

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