stan_data.R

In gcgibson/kcde-new: My First Collection of Functions

N1 <-
101L
x1 <-
c(-2, -1.96, -1.92, -1.88, -1.84, -1.8, -1.76, -1.72, -1.68, 
-1.64, -1.6, -1.56, -1.52, -1.48, -1.44, -1.4, -1.36, -1.32, 
-1.28, -1.24, -1.2, -1.16, -1.12, -1.08, -1.04, -1, -0.96, -0.92, 
-0.88, -0.84, -0.8, -0.76, -0.72, -0.68, -0.64, -0.6, -0.56, 
-0.52, -0.48, -0.44, -0.4, -0.36, -0.32, -0.28, -0.24, -0.2, 
-0.16, -0.12, -0.08, -0.04, 0, 0.04, 0.08, 0.12, 0.16, 0.2, 0.24, 
0.28, 0.32, 0.36, 0.4, 0.44, 0.48, 0.52, 0.56, 0.6, 0.64, 0.68, 
0.72, 0.76, 0.8, 0.84, 0.88, 0.92, 0.96, 1, 1.04, 1.08, 1.12, 
1.16, 1.2, 1.24, 1.28, 1.32, 1.36, 1.4, 1.44, 1.48, 1.52, 1.56, 
1.6, 1.64, 1.68, 1.72, 1.76, 1.8, 1.84, 1.88, 1.92, 1.96, 2)
y1 <-
c(0.49641369737463, 0.304292418217199, -0.284114216613041, 0.202432293803698, 
0.330136135289718, -0.0790576387026071, 0.311613746570623, 0.0851315275966327, 
-0.481936168175116, -0.158550201704766, 0.10200654129734, -0.0298838528766039, 
0.543520078651932, 0.178223976568491, -0.179434021173475, 0.273817824350864, 
-0.695810299552995, -0.26050069827618, 0.151964790234059, -0.513588778635042, 
-0.480501589154684, -0.611507852620895, -0.862435021068338, -0.59257092963463, 
-0.448043268678268, -0.478731115600704, -0.678437437402254, -0.729148116317293, 
-0.989931442873944, -1.05243809295233, -0.809485089604511, -1.21736455547019, 
-0.941448864258697, -0.91436283116628, -1.45315817106935, -1.40337457119639, 
-1.18932663834873, -1.16666494597134, -1.29929376488339, -0.821665631888291, 
-1.77274249537326, -1.12253518638801, -1.13733575877902, -1.51663296274217, 
-1.1478042714316, -1.57065714030008, -1.60083713402864, -1.63013544669426, 
-0.820684938245404, -2.28387761444971, -1.42517096757195, -1.79025170176469, 
-1.38256874384627, -1.46345855433044, -1.18602459083182, -1.32579009598756, 
-1.23893363063211, -0.987209839002612, -1.06020550055085, -1.34756371936919, 
-1.14261651435003, -0.992720871742132, -1.12542985906058, -1.26266476508195, 
-1.39674334884716, -0.869738512331344, -1.50411954781669, -1.09928766498753, 
-1.19494642299172, -1.29029324607406, -1.27448059013038, -1.26371325373052, 
-1.40896020666361, -0.818778759781538, -0.921446298160252, -0.971506331457121, 
-0.824866768513517, -1.28410799524206, -0.836446681580172, -0.975899378746221, 
-0.594086880268836, -0.796864910227532, -0.908785575965672, -1.02879916940127, 
-0.981866082072869, -0.327510798920694, -1.10349234975949, -1.10648360613806, 
-0.565595321975913, -0.471242157019323, -0.704604432766822, -0.125404966287696, 
-0.289080319068516, -0.983088683914429, -0.901159739617099, -0.647084531950042, 
-0.662713897242394, -0.581985403749255, -0.780108081067322, -0.771560634898175, 
-0.403251900041036)
N2 <-
161L
x2 <-
c(-3.2, -3.16, -3.12, -3.08, -3.04, -3, -2.96, -2.92, -2.88, 
-2.84, -2.8, -2.76, -2.72, -2.68, -2.64, -2.6, -2.56, -2.52, 
-2.48, -2.44, -2.4, -2.36, -2.32, -2.28, -2.24, -2.2, -2.16, 
-2.12, -2.08, -2.04, -2, -1.96, -1.92, -1.88, -1.84, -1.8, -1.76, 
-1.72, -1.68, -1.64, -1.6, -1.56, -1.52, -1.48, -1.44, -1.4, 
-1.36, -1.32, -1.28, -1.24, -1.2, -1.16, -1.12, -1.08, -1.04, 
-1, -0.96, -0.92, -0.88, -0.84, -0.8, -0.76, -0.72, -0.68, -0.64, 
-0.6, -0.56, -0.52, -0.48, -0.44, -0.4, -0.36, -0.32, -0.28, 
-0.24, -0.2, -0.16, -0.12, -0.08, -0.04, 0, 0.04, 0.08, 0.12, 
0.16, 0.2, 0.24, 0.28, 0.32, 0.36, 0.4, 0.44, 0.48, 0.52, 0.56, 
0.6, 0.64, 0.68, 0.72, 0.76, 0.8, 0.84, 0.88, 0.92, 0.96, 1, 
1.04, 1.08, 1.12, 1.16, 1.2, 1.24, 1.28, 1.32, 1.36, 1.4, 1.44, 
1.48, 1.52, 1.56, 1.6, 1.64, 1.68, 1.72, 1.76, 1.8, 1.84, 1.88, 
1.92, 1.96, 2, 2.04, 2.08, 2.12, 2.16, 2.2, 2.24, 2.28, 2.32, 
2.36, 2.4, 2.44, 2.48, 2.52, 2.56, 2.6, 2.64, 2.68, 2.72, 2.76, 
2.8, 2.84, 2.88, 2.92, 2.96, 3, 3.04, 3.08, 3.12, 3.16, 3.2)