Замена NA в матрице в R - PullRequest
       1

Замена NA в матрице в R

0 голосов
/ 21 октября 2018

Я создал контейнер NA и пытаюсь заменить NA с указанным значением, которое является аргументом в одной из функций.

num.cars.beg<-20
num.cars.end<-70
num.cars.incr<-5
num.cols<-(abs(num.cars.end-num.cars.beg)/num.cars.incr)+1
num.its<-10
car.var.mat<-matrix(NA,num.its,num.cols) #creates empty container to hold 
results
car.intervals<-c(seq(num.cars.beg,num.cars.end, num.cars.incr))
colnames(car.var.mat)<-paste(car.intervals,"Cars",sep = " ")
rownames(car.var.mat)<-paste("Iter.",c(seq(1,num.its,1)),sep = "")

Это создало матрицу, в которой строки управляются "num.its", а столбцы - "num.cars" с интервалом 20-70 с интервалом 5. Для каждой итерации мне бы хотелосьчтобы пропустить каждый столбец по моей формуле "run.sim" и заменить NA значениями run.sim.Так, например:

               num.cars = 20     num.cars = 25
num.its = 1   run.sim1 output    run.sim2 output
num.its = 2   run.sim3 output    run.sim4 output

, где

run.sim(num.cars = each value in car.intervals, num.its = 2)

1 Ответ

0 голосов
/ 21 октября 2018

Ключом к заполнению контейнера является 1), чтобы убедиться, что цикл for структурирован как "1: numcols" или "1: numrows" и 2) что аргумент в run.sim для num.cars определен через [] матрицы car.intervals, чтобы вы пояснили, что функция проходит по каждой строке i, в соответствующем месте в каждом столбце j.

num.its <- 1
num.itr <- 10
for (i in 1:num.itr){
  for (j in 1:num.cols){
    car.var.mat[i,j]<-mean(run.sim(
     num.cars = car.intervals[j], 
     num.its = num.its))
  }
}
Добро пожаловать на сайт PullRequest, где вы можете задавать вопросы и получать ответы от других членов сообщества.
...