UTWORZENIE PLIKÓW
> len=(30)
> len
[1] 30
> x=30*runif(len)
> x
[1] 3.923731 13.013539 12.725274 21.771907
[5] 7.237774 21.042060 12.896597 20.402399
[9] 19.323899 24.389495 9.131399 18.817308
[13] 20.421035 25.801254 12.568713 1.500314
[17] 29.406176 23.731132 19.844014 22.103739
[21] 25.034141 14.774563 23.176256 10.103391
[25] 29.021398 11.034695 22.132432 28.195747
[29] 7.488908 10.335429
> y=x+rnorm(len,0,0.5)
> ds=data.frame(x=x,y=y)
> ds
x y
1 3.923731 3.196332
2 13.013539 13.709349
3 12.725274 12.546774
4 21.771907 22.223738
5 7.237774 7.547028
6 21.042060 20.584675
7 12.896597 12.875815
8 20.402399 19.806836
9 19.323899 18.237815
10 24.389495 24.280900
11 9.131399 9.235892
12 18.817308 19.565093
13 20.421035 20.808125
14 25.801254 25.886928
15 12.568713 13.094535
16 1.500314 2.003454
17 29.406176 29.033595
18 23.731132 23.310339
19 19.844014 20.221600
20 22.103739 20.882344
21 25.034141 25.742143
22 14.774563 14.355237
23 23.176256 22.870974
24 10.103391 10.898253
25 29.021398 29.246899
26 11.034695 10.620190
27 22.132432 22.644894
28 28.195747 27.854796
29 7.488908 7.246011
30 10.335429 9.984817
> plot(y~x)
> x
[1] 3.923731 13.013539 12.725274 21.771907
[5] 7.237774 21.042060 12.896597 20.402399
[9] 19.323899 24.389495 9.131399 18.817308
[13] 20.421035 25.801254 12.568713 1.500314
[17] 29.406176 23.731132 19.844014 22.103739
[21] 25.034141 14.774563 23.176256 10.103391
[25] 29.021398 11.034695 22.132432 28.195747
[29] 7.488908 10.335429
> y
[1] 3.196332 13.709349 12.546774 22.223738
[5] 7.547028 20.584675 12.875815 19.806836
[9] 18.237815 24.280900 9.235892 19.565093
[13] 20.808125 25.886928 13.094535 2.003454
[17] 29.033595 23.310339 20.221600 20.882344
[21] 25.742143 14.355237 22.870974 10.898253
[25] 29.246899 10.620190 22.644894 27.854796
[29] 7.246011 9.984817