alpha <- 0.025
alpha0 <- 0.01
iuse0 <- 4
iuse1 <- 4
phi0 <- -4
phi1 <- -4
t0 <- (1:5)/5
t1 <- (1:4)/4
rho <- 0.5
delta0 <- 1
delta1 <- 3
sPwRholm(alpha=alpha, alpha0=alpha0,
t0=t0, t1=t1,
delta0=delta0, delta1=delta1,
rho=rho, iuse0=iuse0, iuse1=iuse1,
phi0=phi0, phi1=phi1)
Run the code above in your browser using DataLab