/* Programa SAS para Eaborar Graficos de Controle com Box Plot */



options ps=60 ls=80;

data lengdata;
   infile 'a:\arenoso.dad';
   label Terra='Quantidade de Terra';
   input caminhao Terra;


proc print data=lengdata;
run;


symbol1 v=plus h=1.5 c=blue;
title f=swiss 'Box Chart para Controle de Terra Solo Arenoso ';

proc shewhart data=lengdata graphics;
   boxchart Terra*Caminhao /
      cboxes=blue
      cboxfill=black
      cframe=black
      font=simplex
      nohlabel
      nolegend;
run;

goptions reset=global;