examdata1 <- structure(list(x = c(0, 0.0101010101010101, 0.0202020202020202, 0.0303030303030303, 0.0404040404040404, 0.0505050505050505, 0.0606060606060606, 0.0707070707070707, 0.0808080808080808, 0.0909090909090909, 0.101010101010101, 0.111111111111111, 0.121212121212121, 0.131313131313131, 0.141414141414141, 0.151515151515152, 0.161616161616162, 0.171717171717172, 0.181818181818182, 0.191919191919192, 0.202020202020202, 0.212121212121212, 0.222222222222222, 0.232323232323232, 0.242424242424242, 0.252525252525253, 0.262626262626263, 0.272727272727273, 0.282828282828283, 0.292929292929293, 0.303030303030303, 0.313131313131313, 0.323232323232323, 0.333333333333333, 0.343434343434343, 0.353535353535354, 0.363636363636364, 0.373737373737374, 0.383838383838384, 0.393939393939394, 0.404040404040404, 0.414141414141414, 0.424242424242424, 0.434343434343434, 0.444444444444444, 0.454545454545455, 0.464646464646465, 0.474747474747475, 0.484848484848485, 0.494949494949495, 0.505050505050505, 0.515151515151515, 0.525252525252525, 0.535353535353535, 0.545454545454545, 0.555555555555556, 0.565656565656566, 0.575757575757576, 0.585858585858586, 0.595959595959596, 0.606060606060606, 0.616161616161616, 0.626262626262626, 0.636363636363636, 0.646464646464647, 0.656565656565657, 0.666666666666667, 0.676767676767677, 0.686868686868687, 0.696969696969697, 0.707070707070707, 0.717171717171717, 0.727272727272727, 0.737373737373737, 0.747474747474748, 0.757575757575758, 0.767676767676768, 0.777777777777778, 0.787878787878788, 0.797979797979798, 0.808080808080808, 0.818181818181818, 0.828282828282828, 0.838383838383838, 0.848484848484849, 0.858585858585859, 0.868686868686869, 0.878787878787879, 0.888888888888889, 0.898989898989899, 0.909090909090909, 0.919191919191919, 0.929292929292929, 0.939393939393939, 0.94949494949495, 0.95959595959596, 0.96969696969697, 0.97979797979798, 0.98989898989899, 1), y = c(0.112086569510223, 0.220285257758264, -0.105635909901339, -0.751985947072799, 0.506619922663772, 0.138809990880909, -0.000712082512409371, 0.31078922324397, 0.530007470330607, 0.441292187247377, -0.129758942528466, -0.0402377316171045, -0.126441019345305, -0.612495138993928, -0.556245375822966, -0.317770291806164, -0.402823088747273, 0.960266726180225, 1.11097110208172, 0.558223485950167, 0.264250161703656, 0.294464706770071, -0.321567861411188, -0.152495990566891, -1.00705891058771, 0.75615689291922, 0.223824053455937, -1.19664826661716, 1.01896119042412, -0.507618569319073, 0.192267966763782, 0.638121048611911, 0.564127184412966, 0.261033363901552, 0.829338315140851, 0.375058954538536, 0.36461582585928, 0.127376597941982, 1.41568592117748, 0.323031700112736, -0.214391318009575, 1.0218722098946, -0.332238993416802, -0.00851042962497403, -0.441689065047861, -0.369232413809984, -0.817108589168488, 0.137147745619281, 0.426680284412218, -0.294646024996739, -0.134404597169841, 1.39172759306247, -0.38932453877444, 0.27267683187214, 0.246354843903837, 0.134098920147678, -0.0459122741260986, 0.572032607818921, -0.598692381437247, 0.585479774069072, 0.390528557153159, 1.29423531906053, 0.22566168620627, 0.94732970346761, -0.835142832181462, 2.4585543272818, -0.525456950153892, 0.869310266218444, -0.545571336542218, 0.303193720530087, 0.985868065864134, 1.096764561414, 0.254346381379762, 0.793295246631986, 0.805976935509843, 0.524699065330556, -0.381789820997905, -0.13724453102148, 0.452313289140341, 0.457492557921309, 0.213991499756878, 0.127599795424833, 1.72452433523607, 1.06830997474442, 0.581719643074915, 0.59967003392372, 0.608899892613182, 0.763927190636297, 1.3895608592149, -0.00292314309141162, 1.02077515863162, 2.72391282268494, 0.477964999252163, 1.00441420636032, 1.40561018388293, 1.64994207635752, 0.692241115233835, 1.71195344494288, 1.0341066107134, 0.873104816936209)), .Names = c("x", "y"), row.names = c(NA, -100L), class = "data.frame") examdata1 <- structure(list(x = c(0, 0.0101010101010101, 0.0202020202020202, 0.0303030303030303, 0.0404040404040404, 0.0505050505050505, 0.0606060606060606, 0.0707070707070707, 0.0808080808080808, 0.0909090909090909, 0.101010101010101, 0.111111111111111, 0.121212121212121, 0.131313131313131, 0.141414141414141, 0.151515151515152, 0.161616161616162, 0.171717171717172, 0.181818181818182, 0.191919191919192, 0.202020202020202, 0.212121212121212, 0.222222222222222, 0.232323232323232, 0.242424242424242, 0.252525252525253, 0.262626262626263, 0.272727272727273, 0.282828282828283, 0.292929292929293, 0.303030303030303, 0.313131313131313, 0.323232323232323, 0.333333333333333, 0.343434343434343, 0.353535353535354, 0.363636363636364, 0.373737373737374, 0.383838383838384, 0.393939393939394, 0.404040404040404, 0.414141414141414, 0.424242424242424, 0.434343434343434, 0.444444444444444, 0.454545454545455, 0.464646464646465, 0.474747474747475, 0.484848484848485, 0.494949494949495, 0.505050505050505, 0.515151515151515, 0.525252525252525, 0.535353535353535, 0.545454545454545, 0.555555555555556, 0.565656565656566, 0.575757575757576, 0.585858585858586, 0.595959595959596, 0.606060606060606, 0.616161616161616, 0.626262626262626, 0.636363636363636, 0.646464646464647, 0.656565656565657, 0.666666666666667, 0.676767676767677, 0.686868686868687, 0.696969696969697, 0.707070707070707, 0.717171717171717, 0.727272727272727, 0.737373737373737, 0.747474747474748, 0.757575757575758, 0.767676767676768, 0.777777777777778, 0.787878787878788, 0.797979797979798, 0.808080808080808, 0.818181818181818, 0.828282828282828, 0.838383838383838, 0.848484848484849, 0.858585858585859, 0.868686868686869, 0.878787878787879, 0.888888888888889, 0.898989898989899, 0.909090909090909, 0.919191919191919, 0.929292929292929, 0.939393939393939, 0.94949494949495, 0.95959595959596, 0.96969696969697, 0.97979797979798, 0.98989898989899, 1), y = c(0.112086569510223, 0.220285257758264, -0.105635909901339, -0.751985947072799, 0.506619922663772, 0.138809990880909, -0.000712082512409371, 0.31078922324397, 0.530007470330607, 0.441292187247377, -0.129758942528466, -0.0402377316171045, -0.126441019345305, -0.612495138993928, -0.556245375822966, -0.317770291806164, -0.402823088747273, 0.960266726180225, 1.11097110208172, 0.558223485950167, 0.264250161703656, 0.294464706770071, -0.321567861411188, -0.152495990566891, -1.00705891058771, 0.75615689291922, 0.223824053455937, -1.19664826661716, 1.01896119042412, -0.507618569319073, 0.192267966763782, 0.638121048611911, 0.564127184412966, 0.261033363901552, 0.829338315140851, 0.375058954538536, 0.36461582585928, 0.127376597941982, 1.41568592117748, 0.323031700112736, -0.214391318009575, 1.0218722098946, -0.332238993416802, -0.00851042962497403, -0.441689065047861, -0.369232413809984, -0.817108589168488, 0.137147745619281, 0.426680284412218, -0.294646024996739, -0.134404597169841, 1.39172759306247, -0.38932453877444, 0.27267683187214, 0.246354843903837, 0.134098920147678, -0.0459122741260986, 0.572032607818921, -0.598692381437247, 0.585479774069072, 0.390528557153159, 1.29423531906053, 0.22566168620627, 0.94732970346761, -0.835142832181462, 2.4585543272818, -0.525456950153892, 0.869310266218444, -0.545571336542218, 0.303193720530087, 0.985868065864134, 1.096764561414, 0.254346381379762, 0.793295246631986, 0.805976935509843, 0.524699065330556, -0.381789820997905, -0.13724453102148, 0.452313289140341, 0.457492557921309, 0.213991499756878, 0.127599795424833, 1.72452433523607, 1.06830997474442, 0.581719643074915, 0.59967003392372, 0.608899892613182, 0.763927190636297, 1.3895608592149, -0.00292314309141162, 1.02077515863162, 2.72391282268494, 0.477964999252163, 1.00441420636032, 1.40561018388293, 1.64994207635752, 0.692241115233835, 1.71195344494288, 1.0341066107134, 0.873104816936209)), .Names = c("x", "y"), row.names = c(NA, -100L), class = "data.frame")