# NOT RUN {
mydata <- generate.panel.1order(time=0:100,
excitation = c(rep(0,50),rep(1,51)),
nind = 6,
internoise = 0.2,
intranoise = 100)
plot(mydata)
# }
Run the code above in your browser using DataLab