Сохранение результатов из цикла for, в котором число возвратов увеличивается на каждой итерации - PullRequest
Новая
       2

Сохранение результатов из цикла for, в котором число возвратов увеличивается на каждой итерации

1 голос
/ 05 октября 2019

Я новичок в R. Я программировал с ним только месяц или около того.

То, что я пытаюсь сделать, это генерировать и назначать координаты x и y для растущей / распространяющейся популяции на каждом временном шаге, используя цикл for.

Проблема, которую я имею, заключается в сохранениивернул x и y выходы из цикла for. Ключевой вопрос заключается в том, что количество возвратов увеличивается с каждой итерацией, и я хотел бы, чтобы они сохранялись на каждом временном шаге. Например, в T0 есть один возврат, а в T20 496.

Я пытался создать решетку, массивы, фреймы данных и т. Д. Все, что я нашел в Интернете, не помогло. 

set.seed(29807)
Adults <- allYears[3,]                     # Adult tree population yrs 1:20
Time <- 21
dist <- abs(rnorm(Distance, mean = 51.5, sd = 63))  # dispersal distribution
# Distance refers to the data table with 29807 distances.

# CREATE A FOR LOOP WHERE YOU DRAW X NUMBER OF DISTANCES EQUIVALENT TO THE NUM OF ADULTS AT THAT TIME STEP

for (i in 1:Time) {                                            
  N <- sample(dist, size = round(Adults[i]), replace = FALSE)  
  theta <- runif(N,0,2*pi)            # distance is assigned direction 
  x <- cos(theta)*N                   # assign variate a polar coordinate x
  y <- sin(theta)*N                   # assign variate a polar coordinate y
}
...