绘图中轴刻度的定义

画proc gplot散点图中遇到难题，用axis定义轴以及刻度，
轴上刻度范围是0到13，想把刻度显示成为0，4，8，12，13，在0到12可以用order(0 to 12 by 4)但是如果把13加上（0 to 12 by 4 13），13虽然能显示在轴上但是
12到13之间的距离是4个单位的长度而不是一个单位的长度，请问如何解决此问题？多谢.,下附SAS代码：
goptions reset=all;
axis1 minor=(number=1) label=none order=(0 to 12 by 4,13) ;
data one;
input y x;
cards;
2 0
3 7
4 9
2 13
6 8
5 2
;
run;
proc gplot data=one;
plot y*x/haxis=axis1;
run;quit;

pinggu2688 发表于 2011-7-28 02:52
关键是不需要显示刻度值的刻线如何去掉，比如刻线在1，2，3的时候不需要显示，如何去掉刻线，或者刻线高度如何把不需要显示的刻线（其他）高度设置为0，需要显示的刻线（0，4，8，12，13）高度设置为1？

用Annotate可以解决这个问题！！！

1. 
   
2. options symbolgen;
   
3. %let n=13;
   
4. %let n1=%eval(&n.-1);
   
5. %let m=4;
   
6. data one;
   
7. input y x;
   
8. cards;
   
9. 2 0
   
10. 3 7
    
11. 4 9
    
12. 2 13
    
13. 6 8
    
14. 5 2
    
15. ;
    
16. run;
    
17. 
    
18. %macro test();
    
19. data tick;
    
20. do i=1 to &n;
    
21. mode=mod(i,&m.);
    
22. if mode=0 then tick=put(i,2.);
    
23. else tick=' ';
    
24. output;
    
25. end;
    
26. run;
    
27. proc sql noprint;
    
28. select  tick INTO : tick1 -:tick&n1
    
29. from tick
    
30. ;
    
31. quit;
    
32. DATA plotanno;
    
33. set one end=eof;
    
34.        Length FUNCTION COLOR STYLE font $8 TEXT $100  ;
    
35.        RETAIN COLOR 'BLACK' WHEN 'A' LINE 1 ;
    
36. %do k=1 %to &n1;
    
37.      %IF "&&tick&k."  NE NONE %THEN  %DO;
    
38.     YSYS='1'; XSYS='2'; HSYS='5'; font='Arial';
    
39.     line=1; size=0.1; color='BLACK';
    
40.     function='move'; y=0; x=INPUT("&&tick&k.",2.); Output;YSYS='9';
    
41. function='draw';  y=-1; Output;
    
42.     %END;  %END;
    
43. if eof then do;
    
44.     YSYS='1'; XSYS='2'; HSYS='5'; font='Arial';
    
45.      line=1; size=0.1; color='BLACK';
    
46.     function='move'; y=0; x=0; Output;YSYS='9';
    
47. function='draw';  y=-1; Output;
    
48.     function='move'; y=1; x=13; Output;YSYS='9';
    
49. function='draw';  y=-1; Output;
    
50. end;
    
51. RUN;
    
52. axis1 minor=(number=1) label=none major=NONE  minor=none value=('0' %do j=1 %to &n1; "&&tick&j." %end; "&n") ;
    
53. proc gplot data=one anno=plotanno;
    
54. plot y*x/haxis=axis1;
    
55. run;quit;
    
56. %mend;
    
57. %test();

复制代码

这个好像sas改不了，你可以参考Graph reference

如果你硬要给改成这样，可以修改一下每个刻度的label,将不是这些数值的设为missing，order=（0 to 13 by 1）

利用proc format修改

这样是否合lz意

1. goptions reset=all;
   
2. proc format;
   
3. value vfmt 0,4,8,12,13 =[2.] other='';
   
4. run;
   
5. axis1 minor=(number=1) label=none order=( 0 to 13 by 1 );
   
6. data one;
   
7. input y x;
   
8. cards;
   
9. 2 0
   
10. 3 7
    
11. 4 9
    
12. 2 13
    
13. 6 8
    
14. 5 2
    
15. ;
    
16. run;
    
17. proc gplot data=one;
    
18. plot y*x/haxis=axis1;
    
19. format x vfmt.;
    
20. run;quit;

复制代码

把format 的other改为 other=" "；

axis1 minor=(number=1) value=( "0" "" "" "" "4" "" "" "" "8" "" "" "" "12" "13")  order=( 0 to 13 by 1 );

还有其他方法么

这个问题比较有趣,还有其他方法么??