data one;
  input barprss wndspd @@;
  cards;
1004 41 975 100 992 65 935 145 985 80 932 151 953 132 945 .
;

proc plot;
  plot wndspd*barprss;
run;

proc reg;
  model wndspd=barprss / p clm cli alpha=0.05;
run;