list(P=c(0.60,0.55,0.50,0.45,0.40,0.35,0.30,0.30,0.70,0.65,0.60,0.55,0.50,0.45,0.40,0.35,0.30,0.3,0.1,0.9,1.5,2.0,3.0), isigma=100, ivarepsilon=1,inu=1,iepsilon=1,itau=1,S=0.2,K=600,m=c(0.9, 0.9, 0.9, 0.9, 0.9, 0.9, 0.9, 0.9, 0.9, 0.9, 0.9, 0.9, 0.9, 0.9, 0.9, 0.9, 0.9, 0.9,0.9,0.9,0.9,0.9,0.9),rp=c(0.2, 0.2, 0.2, 0.2, 0.2, 0.2, 0.2, 0.2, 0.2, 0.2, 0.2, 0.2, 0.2, 0.2, 0.2, 0.2, 0.2, 0.2,0.2,0.2,0.2,0.2,0.2),qI=c(0.1, 0.1, 0.1, 0.1, 0.1, 0.1, 0.1, 0.1, 0.1, 0.1, 0.1, 0.1, 0.1, 0.1, 0.1, 0.1, 0.1, 0.1, 0.1, 0.1, 0.1,0.1,0.1))