/* Lesson 13-01 */
 /*    File Name = les1301.sas  01/19/21   */

options nocenter linesize=78 pagesize=30;
options locale='en_US';
/* options locale='ja_JP'; */
proc printto print = 'StatM20/les1301-Results.txt' new;

data pair;
  input x y @@;
  dif=x-y;
cards;
  3.51 3.39  3.07 3.39  3.29 3.20  3.03 3.11
  3.38 3.17  3.30 3.09  3.15 3.17  3.25 3.09
;

proc print data=pair;
run;

ods listing;
ods graphics off;
proc univariate data=pair plot;
  var dif;
run;