filename failas '/folders/myfolders/hills.txt';
data hills;
	infile failas;
	input race $1-15  distanc climb timet;
label race   = 'Lekntyniu pavadinimas'
      distanc  = 'Atstumas'
      climb   = 'Kopimo aukstis'
      timet = 'Laikas';
run;
/*koreliacijos tarp kintamuju tyrimas*/
proc corr data = hills;
  var  climb distanc timet;
run;
/*pilno modelio ivertinimas ir koreliacijos rodikliai*/
proc reg data=hills;
	model climb = distanc timet / collin tol vif;
run;
/*iv. modeliu palyginimas*/
proc reg data=hills;
	model climb = distanc timet / selection=rsquare cp adjrsq mse;
run;
/*pasirinkto modelio taskiniu iverciu radimas*/
title ' ';
proc reg data=hills alpha=0.05 outest=int1 tableout;
model climb = distanc timet / influence;
plots r.*p. student.*nqq./ ctext=vip caxis=blue;
output out=juostos1 LCL=k2 LCLM=k1 p=climb_prog UCLM=d1  UCL=d2 ;
output out=prog1 p=climb_prog student=normliek;
run;