Displaying 1 result from an estimated 1 matches for "endzeit".
Did you mean:
endtext
2009 Jan 14
1
Adressing list-elements
...} else {
FP[k,j]<-FP[k-1,j]*
exp(-0.5*Step*sum((loadmatrix[j,1:princomp]*eigen[1:princomp])^2)
+(sqrt(Step)*sum(loadmatrix[j,1:princomp]*eigen[1:princomp]*shocks)))
}
}
}
Simulation[[i]]<-list(FP)
shocklist[[i]]<-list(shockmatrix)
}
endzeit<-Sys.time()
Berechnungsdauer<-endzeit-now
Berechnungsdauer
Simulation[[1]]
shocklist[[1]]