# This is data to be used in homework assignment 4.
# Intro to R course; Notre Dame; Fall 2007

x1 <- c(0.199360380589024,-1.65382162397162,-1.32174399804760,0.65355214721265,-1.32485934551218,-2.92307663761885,-1.44827781533050,0.508765851350774,-1.29106169149126,-0.320757911596544,-0.804706945630375,0.870286385360268,-1.08314978994725,-0.225184159441515,0.260452951326342,0.115659174651644,0.537685378933709,1.34025476719059,0.8712573090904,0.768322658939126)

x2 <- c(1.16419992140093,1.40300870771951,2.18179782124422,1.56514122293278,1.79778591365012,2.49402067458487,0.675639989919019,2.77688473972159,0.368702099971043,2.19292024786429,0.883020646047614,1.64343031708667,0.180841839024964,0.571207239570588,-0.985246726088903,2.53757551665271,0.297207452806019,-0.655384042376177,0.525003024656084,0.537184224396051)

x3 <- c(1.31012532811742,0.0531657199597921,1.97795983485012,1.54394596333137,0.634427990239511,1.57220961739950,0.918231819794357,1.96936045856587,1.02771674708802,1.59785694657471,0.396787625504992,3.65337311121874,1.12505260014323,0.266052247231429,0.950189584964287,0.98325304754323,1.00945171124257,1.39779951628292,2.05514570224553,1.65479051181760)

z1 <- c(0.685193285929565,-0.528727584252477,0.416942811400867,-0.121049352819269,1.58033855585715,2.8228187513271,0.43411085494959,-0.834073877999297,-1.87489300752838,0.272302733996094,0.6963682233271,0.656190239330926,1.50244120127737,1.44864737032948,1.49488641108223,0.715863976892455,1.68706746714348,2.95692307671888,1.34965354148909,2.84135955184486)

z2 <- c(-1.73401649649074,0.746616582247136,-1.87721225662942,0.481030818595419,-0.525162741228509,1.79043573319441,-0.222357434413976,-0.378786319001634,-1.75434199484625,-1.02445844495943,1.21440606605847,-3.84307986770066,-2.04534305783049,-1.59816807371675,-1.23097272339347,-3.60304882585795,-1.40156191632916,-1.36230311023224)

print("The variables created are x1, x2, x3, z1, z2")