/* Exercise 2.28, page 129. */
 
options nodate;
data icicles;
infile 'C:\1_Courses\223\ta02_004.txt' delimiter='09'x; 
input run $ time length;
datalines;

proc corr data=icicles;
title 'Correlation Between Icicle Growth and Time';
var time length;
by run;
run;