* BodyBrain Example -- source code file body-brain.sas;

data body_brain;
   infile 'c:/datasets/body-brain.txt' firstobs=3; 
   input animal $ 1-16 body brain;
   label body='Body Weight (kg)'
         brain='Brain Weight (g)';

proc print;

* Obtain regression model for original dataset;
proc reg data=body_brain;
   model brain=body;
   plot brain*body r.*p. r.*nqq.;

* Apply log-log transform;
data log_log;
   set body_brain;
   keep logbody logbrain;
   logbody = log(body);
   logbrain = log(brain);
   label logbody='Log Body Weight (kg)'
         logbrain='Log Brain Weight (g)';

proc print;

* Obtain regression model for transformed dataset;
proc reg data=log_log;
   model logbrain=logbody;
   plot logbrain*logbody r.*p. r.*nqq.;

run;
quit;