
varset(N, sigma=0.1, theta=90, threshold=0, u=1:3)
sigma
. U is a 2*2 Matrix, where
theta90 <- varset(N = 1000, sigma = 0.1, theta = 90, threshold = 0)
theta0 <- varset(N = 1000, sigma = 0.1, theta = 0, threshold = 0)
par(mfrow = c(1, 2))
plot(theta0$intermediate)
plot(theta90$intermediate)
Run the code above in your browser using DataLab