# NOT RUN {
if(w32chk()){
ctStanDiscretePars(ctstantestfit,times=seq(.5,4,.1),
plot=TRUE,indices='CR')
#modify plot
require(ggplot2)
g=ctStanDiscretePars(ctstantestfit,times=seq(.5,4,.1),
plot=TRUE,indices='CR')
g= g+ labs(title='Cross effects')
print(g)
}
# }
Run the code above in your browser using DataLab