hi ... use Linlin's data ... proc transpose data=have out=want(drop=_name_); by id1; id quest; var ans; run; and here's another way to use an array ... data want (drop=quest ans); array q(3) $6; do until (last.id1);    set x;    by id1;    q(input(char(quest,2),1.)) = ans; end; run; ... View more

hi ... given the choice of trying to write SAS code that would figure out the SYMBOL statement based on the data versus just doing with I did, I would say that the choice depends on how often you are going to do this for the two plots, the effort of cutting/pasting code took a LOT less time that writing SAS code that would write SAS code for or "when to hold 'em, when to fold 'em" ... View more

hi ... the attached SAS code produced the two attached plots I just took out the "by dose" and did two separate plots, changing the symbols from plot1 to plot2 to conform with the number of people in each study I think it's correct, but you should check the allocation of people to study ... View more

hi ... using your data (too many lines to make any sense ???) ... libname x 'z:\gplot data.xls'; proc sort data=x."'#LN00453$'"n out=x; by dose; run; goptions reset=all ftext='calibri' htext=2 gunit=pct; symbol1 i=join v='6c'x f='wingdings' w=4 h=2 color=green; symbol2 i=join v='6c'x f='wingdings' w=4 h=2 color=blue; symbol3 i=join v='6c'x f='wingdings' w=4 h=2 color=grey; symbol4 i=join v='6c'x f='wingdings' w=4 h=2 color=orange; symbol5 i=join v='6c'x f='wingdings' w=4 h=2 color=red; symbol6  i=join v='6e'x f='wingdings' w=4 h=2 color=green; symbol7  i=join v='6e'x f='wingdings' w=4 h=2 color=blue; symbol8  i=join v='6e'x f='wingdings' w=4 h=2 color=grey; symbol9  i=join v='6e'x f='wingdings' w=4 h=2 color=orange; symbol10 i=join v='6e'x f='wingdings' w=4 h=2 color=red; symbol11 i=join v='ab'x f='wingdings' w=4 h=2 color=green; symbol12 i=join v='ab'x f='wingdings' w=4 h=2 color=blue; symbol13 i=join v='ab'x f='wingdings' w=4 h=2 color=grey; symbol14 i=join v='ab'x f='wingdings' w=4 h=2 color=orange; symbol15 i=join v='ab'x f='wingdings' w=4 h=2 color=red; legend1 position=(top inside right) mode=protect across=1 label=none shape=symbol(.0005,2)pct; axis1 offset=(2,2)pct; axis2 label=(a=90); title1 a=90 ls=2; title2 a=-90 ls=2; proc gplot data = x; plot conc_ngml*Nominal__Time=subject__alias / legend=legend1 haxis=axis vaxis=axis2 noframe; by dose; format conc_ngml 4.1; run; quit; ... View more

hi ... what do you mean by "line statement" do you really mean SYMBOL statement ? also, this ... plot conc_ngml*Nominal_Time_day=subject_alias; you are putting 10 lines on one plot, 15 on another =  unreadable yes/no? ... View more

hi ... another idea ... proc format; value $claim '1111111111', '2222222222', '3333333333', '4444444444', '5555555555', '6666666666', '7777777777', '8888888888', '9999999999' = '1' other= '0'; run; proc sql; create table test1 as select * from alldrgs_asofi where put(put(clm_aud_nbr,$10.),$claim.) eq '1' order clm_aud_nbr; run; ... View more

hi ... here's an example where line color and type varies by the value of the variable sex (there are 46 line patterns, 1 is solid, etc.) look at the SYMBOL statements ... l=1 is short for line=1 proc sort data=sashelp.class out=class; by height; run; goptions reset=all; legend1 position=(top inside right) label=none across=1 shape=symbol(.0005,1) value=('FEMALE' 'MALE'); symbol1 v='6c'x f='wingdings' c=red  i=smp66 l=1; symbol2 v='6c'x f='wingdings' c=blue i=smp66 l=3; proc gplot data=class; plot weight*height=sex / legend=legend1; run; quit; ps  lots of info in a SUGI paper (http://www2.sas.com/proceedings/sugi31/239-31.pdf) ... View more

Hi ... I have no idea, but it's no big deal.  The problem solving is the interesting part of all this, not the points (just between you and me and anyone else who reads the note, I think that the whole points thing is kind of pointless). ... View more

hi ... I'm using V9.3 I made some data similar to what you posted in your plot then I tried your SAS code (PLOT1.PNG) and then mine (see below and PLOT2.PNG) I don't get that skew (offset on the right) for either plot ... are you using EG to do your plots (have you tried SGPLOT ... surprised that no "SG advocates" are yet to contribute) * data similar to yours; data fig1; start = 35000; do trtgrp=-1 to 1 by 2; do mm = 1 to 37;    m = intnx('month','01dec07'd,mm);    change = ifn(ranuni(999) le .5 ,1 ,-1);    avg_f200 = start + (trtgrp*15000)  + (change*ceil(5000*ranuni(999)));    output; end; end; drop change; format m date9.; run; I just cut/pasted your posted SAS code here with this edited AXIS statement an got PLOT1 using the variable MM in the plot statement axis1 label=none order=1 to 37 minor=none           value=("J-08" "" "" "A-08" "" "" "J-08" "" "" "O-08" "" ""                  "J-09" "" "" "A-09" "" "" "J-09" "" "" "O-09" "" ""                  "J-10" "" "" "A-10" "" "" "J-10" "" "" "O-10" "" "" "J-11") offset=(0) width=1; * make PLOT2 ... I used M in the plot statement, a real SAS date; goptions reset=all ftext='calibri' htext=2 gunit=pct border; symbol i=join f='wingdings' v='6c'x height=2; axis1 label=none minor=(n=2) offset=(2,2)pct; axis2 label=(a=90 "DKK (100 DKK ~17.8 USD)") minor=none order=(0 to 70000 by 5000); legend1  mode=protect position=(top inside right) across=1 label=none value=('GROUP1' 'GROUP2') shape=symbol(.0005,2)pct; * white space between plot and border; title1 ls=2; title2 a=90 ls=2; title3 a=-90 ls=2; footnote1 ls=2; proc gplot data=fig1; plot avg_f200*m=trtgrp /haxis=axis1 vaxis=axis2 legend=legend1; format avg_f200 comma12.0 m monyy.; run; quit; ... View more

hi ... quite sure it is just a format-related issue and has no effect on the use of the data sets you could always seek a higher authority (http://support.sas.com/ctx/supportform/createForm) ... View more

hi ... the problem may be a 32-bit PC running XP versus a 64-bit PC running 7, it's a problem with catalogs (e.g. format catalogs) one solution (there are most likely others) for formats  is to create CNTLOUT data set on a 32-bit PC and use it as a CNTLIN data set on the 64-bit * some 32-bit formats; proc format; value a 1='1' other='other'; value $a '1'='1'  other='other'; invalue check 1=10 other = _same_; invalue $check '1'='ten' other = _same_; run; * write formats to a data set; proc format lib=work cntlout=hold; run; * go to the 64-bit PC; libname library 'z:\'; proc format library=library cntlin=hold; run; ... View more