So erstellen Sie einen Vektor zum Speichern von Daten

Question

Ich habe dieses einfache Asset-Wachstumsmodell erstellt und 225 Punkte erhalten. Einziges Problem ist, würde ich diese 10-mal wiederholen möchte, speichern grundsätzlich die ersten 225 Punkte und wiederholen Sie nur die Standardnormalzufallsvariable den Vorgang diesmal wieder ändern, hier ist das, was

getan haben, ist

St <- 10 
u <- 0.15 
sigma <- 0.1 
h <- seq(0,1,by=1/225) 
t <- h[-1] 

for (j in 1:10) { 
    z <- rnorm(225) 
    for (i in 1:225){ 
    ST <- St*exp((u-0.5*(sigma^2))*t - sigma*z[j]*sqrt(t)) 
    } 
} 

Answer 1

Können Sie bestätigen, wenn Meine Berechnung ist korrekt:

St <- 10 
u <- 0.15 
sigma <- 0.1 
z <- rnorm(225) 
h <- seq(0,1,by=1/225) 
t <- h[-1] 

List = list() 
for (i in 1:225){ 
    S <- St * exp((u - 0.5 * (sigma^2)) * t[i] - sigma * z[i] * sqrt(t[i])) 
    List[[i]] = S 
} 

Matrix = do.call(rbind, List) 
Matrix 

Wenn es ist, dann wollen Sie das gleiche 10 mal machen? Da Sie nicht reagieren, werde ich weiter gehen und davon ausgehen, dass dies das ist, was Sie wollen. Hier ist der Code:

St <- 10 
u <- 0.15 
sigma <- 0.1 
h <- seq(0,1,by=1/225) 
t <- h[-1] 

BigList = list() 
for (g in 1:10){ 

    z <- rnorm(225) 
    List = list() 
    for (i in 1:225){ 
    S <- St * exp((u - 0.5 * (sigma^2)) * t[i] - sigma * z[i] * sqrt(t[i])) 
    List[[i]] = S 
    } 

    BigList[[g]] = do.call(rbind, List) 
} 
All = do.call(cbind, BigList) 
All