Last chance! 50% off unlimited learning
Sale ends in
n <- 10
t <- cumsum(rexp(n, rate = 0.1))
v <- rnorm(n)
x <- irts(t, v)
x
as.irts(cbind(t, v))
is.irts(x)
# Multivariate
u <- rnorm(n)
irts(t, cbind(u, v))
Run the code above in your browser using DataLab