搓一把睡觉

options ps=60 ls=80;
goptions ftext=none htext=1 cell;
data wxq1638;  
label x='wxq1638提供赞助！';
   do n=1 to 100;
  x=420+100*normal(0);output;end;
title '有任何异议请联系wxq1638@yahoo.com.cn';
proc capability;
   var x;
   spec usl=620   lsl=220  target=420
       cusl=gray clsl=gray ctarget=gray
      cright=yellow cleft=blue;

   hist/lognormal (scale=6 shape=0.25 theta=6.8 noprint fill
                     color=yellow )
          cframe  =  gray
          cfill    = green
          cbarline = gray
          nospeclegend
          nocurvelegend;
   inset betweenpct uslpct lslpct / header='一组随机数中、右、左面积：绿、黄、蓝'
                     cframe = black
                     ctext  = black
                     cfill  = with
                     pos    = ne;

  inset lsl='mu=420 std=100 左边线位置=' lslpct/header='安徽省五河县临北乡石家村卫生室练习数据'
      cshadow=red cframe=yellow ctext=black cfill=white;
      legend1 cframe=gray cborder=black;run;