Jagadishkatam Tracker

Re: 2023 Customer Awards: WCG Clinical Endpoint Solutions - Visual Storyteller

Jagadishkatam — Thu, 22 Jun 2023 22:15:58 GMT

All the best @djrisks

Re: next date as end date by subject

Jagadishkatam — Mon, 27 Sep 2021 07:29:43 GMT

We then have to convert the character date to numeric date and follow the logic.

Re: next date as end date by subject

Jagadishkatam — Mon, 27 Sep 2021 04:43:33 GMT

data have;
input Customer_id date :date9.;
cards;
111 02JAN2021
111 05JAN2021
111 10JAN2021 
222 08JAN2021
333 12MAR2021
333 18MAR2021
;

data want;
merge have have(keep=date rename=(date=date2) firstobs=2);
run;

proc sort data=want;
by Customer_id;
run;

data want2;
set want;
by Customer_id;
if last.Customer_id then date2=date;
format date: date9.;
run;

Re: Fill in missing IDs

Jagadishkatam — Fri, 24 Sep 2021 15:53:59 GMT

Alternatively you may try

data have;
input ID Sex Injury_Type;
datalines;
1 1 1
. 1 2
. 1 3
2 2 1
. 2 3
;
run;

data want;
set have(rename=(id=_id));
by sex Injury_Type notsorted;
retain id;
if first.sex then id=.;
if _id ne . then id=_id;
run;

Re: Help with charts - clustered bar graph (?)

Jagadishkatam — Fri, 24 Sep 2021 13:58:58 GMT

Hope this is what you are expecting

data want;
input location$	testgrade	mathpct34;
cards;
local 3 39.4
state 3 42
national 3 56
local 4 39.8
state 4 44.2
national 4 56.3
local 5 40.6
state 5 38.1
national 5 47.2
;

proc sgplot data=want;
vbar testgrade / response=mathpct34 group=location groupdisplay=cluster;
xaxis display=(nolabel noline noticks);
run;

Re: SGplot x axis ticks without lumping or losing data

Jagadishkatam — Thu, 23 Sep 2021 07:39:38 GMT

Please try to use the option type=linear in xaxis statement as below

proc sgplot data=nominees;
	where year > 1000;
	vbar year / group = type stat=freq groupdisplay=stack grouporder=descending;
	xaxis label = "Year"  type=linear values=(1960 to 2020 by 5);
run;

Re: Proc transpose help

Jagadishkatam — Tue, 21 Sep 2021 16:58:26 GMT

data one;
input trt$ aval$ nobs pct;
datalines;
a complete 10 20
a disconti 20 40
b complete 20 40
b disconti 10 20
;

proc sort data=one;
by aval;
run;

proc transpose data=one out=want suffix=_nobs;
by  aval;
id trt;
var nobs;
run;

proc transpose data=one out=want2 suffix=_pct;
by  aval;
id trt;
var pct;
run;

data want3;
merge want(in=a drop=_name_) want2( drop=_name_);
by aval;
run;

Re: Remove x axis percent values in proc sgplot

Jagadishkatam — Tue, 21 Sep 2021 14:58:46 GMT

You may try

XAXIS DISPLAY=(NOLABEL NOTICKS NOVALUES);

Re: defining before and after dates using changing dates

Jagadishkatam — Mon, 20 Sep 2021 12:43:44 GMT

Please try

data have;
input account_id PT_DT:date9. MTHLY_PAY MTHLY_PAY_DT_CHANGE:date9.;
format PT_DT MTHLY_PAY_DT_CHANGE date9.;
cards;
12345 01FEB2017 456.98 25JUL2016
12345 01FEB2017 480.64 12SEP2016
12345 01FEB2017 512.34 12FEB2017
12345 01FEB2017 476.96 23MAY2018
12346 01APR2020 984.76 15JUN2019
12346 01APR2020 887.91 03APR2020
12346 01APR2020 634.33 04MAR2021
;
run;

 

data want;
set have;
by account_id;
MTHLY_PAY_BEFORE_PT=lag(MTHLY_PAY);
if first.account_id then MTHLY_PAY_BEFORE_PT=.;
if PT_DT<=MTHLY_PAY_DT_CHANGE then flag=1;
MTHLY_PAY_AFTER_PT=MTHLY_PAY;
keep account_id PT_DT MTHLY_PAY_BEFORE_PT MTHLY_PAY_AFTER_PT flag;
run;

proc sort data=want;
by account_id;
where flag=1;
run;

data want;
set want;
by account_id;
if first.account_id;
run;

Re: unending lines in the series plot of proc template

Jagadishkatam — Sat, 18 Sep 2021 06:40:41 GMT

Thanks a lot Kris, the use of legenditem statement suggestion is helpful.

Re: unending lines in the series plot of proc template

Jagadishkatam — Fri, 17 Sep 2021 23:34:50 GMT

Thank you @Jay54 for your response. I agree with you , the issue when i use var=usubjid is that i get two separate lines as per the expectation but the legend shows two lines for two subjects, however both of the subjects took the same dose , so i want to show the legend with the type pf dose taken in that case i should see only one row in legend. but that is not happening.

Re: unending lines in the series plot of proc template

Jagadishkatam — Fri, 17 Sep 2021 23:13:19 GMT

The unending line is the line returning back to the origin again or circling back, its visible for the second subject data, and this is happening when i use the group=rgoup1 from the discreteattrmap. when i don't use it and simply put group=usubjid in seriesplot then the unending lines are not visible and the subject data is properly plotted.

I want to use the group=rgroup1 from discreteattrmap, so that i can use it for controlling the legend.

I hope i am clear, please check the images of the graphs i posted in the main message. Could you please help with me with it.

Re: unending lines in the series plot of proc template

Jagadishkatam — Fri, 17 Sep 2021 23:08:43 GMT

Thank you @DanH_sas for your response ,

I updated the code as below and i get

data full_subset;
infile cards missover;
input
RGROUP$      USUBJID$     AVISITN MONTH CHANGE;
cards;
dose1 00005 1 0 0
dose1 00005 1
dose1 00005 2 1.3 1.639344262
dose1 00005 2
dose1 00005 3 3.2 10.95081967
dose1 00005 3
dose1 00006 1 0 0
dose1 00006 1
dose1 00006 2 1.3 1.039344262
dose1 00006 2
dose1 00006 3 3.2 16.95081967
dose1 00006 3
;

proc sort data=full_subset;
by rgroup usubjid avisitn;
run;
proc template;
define statgraph sgplot;
begingraph / collation=binary dataContrastColors=( red orange green violet yellow grey ) dataSymbols=( EOT );
SymbolChar char=delta_u NAME=EOT / scale=1;
discreteattrmap name='TGROUPS';
value 'Treatment Ongoing' /markerattrs=(symbol=trianglerightfilled color=black size=12);
enddiscreteattrmap;
discreteattrvar attrvar=TGROUP1 var=TGROUP attrmap='TGROUPS';
discreteattrmap name='RGROUPS';
value 'dose1' /markerattrs=(symbol=squarefilled color=red size=12) Lineattrs=( Pattern=1 Thickness=2 color=red);
enddiscreteattrmap;
discreteattrvar attrvar=RGROUP1 var=rgroup attrmap='RGROUPS';

layout overlay / walldisplay=(fill) xaxisopts=( Label="Time since first dose date (months)" type=linear linearopts=(tickvaluesequence=(start=0 end=15 increment=0.5))) y2axisopts=(labelFitPolicy=Split) yaxisopts=( Label="Tumor size (% change from baseline)" labelFitPolicy=Split type=linear ) y2axisopts=(labelFitPolicy=Split);

SeriesPlot X=month Y=change /xaxis=x yaxis=y /*Group=usubjid*/ break=true LineColorGroup=RGROUP1 MarkerColorGroup=RGROUP1 markersymbolgroup=rgroup1 display=(markers) LegendLabel="CHANGE" NAME="trt";

Layout Gridded / Border=true autoalign=(topleft topright) valign=top;

Layout Gridded;
endlayout;
endlayout;
DiscreteLegend "trt" /*"b"*/ / Location=Inside across=1 type=marker halign=right Title ="Dose Level" ValueAttrs=( Size=5) Opaque=true titleattrs=(family="Arial" size=8pt) titleborder=true sortorder=ascendingformatted autoalign=(TOPRIGHT) order=rowmajor border=false valueattrs=(family="Arial" size=8pt) Opaque=true;

endlayout;
endgraph;
end;

run;

proc sgrender data=FULL_SUBSET template=sgplot /*sganno=anno*/;

run;

Re: unending lines in the series plot of proc template

Jagadishkatam — Fri, 17 Sep 2021 19:34:47 GMT

@Rick_SAS @DanH_sas @Jay54 @ballardw @Ksharp @PGStats

Could you please help.

Re: Difference of a value from one variable and the lead of another value in the same variable??

Jagadishkatam — Fri, 17 Sep 2021 18:08:27 GMT

Please try

data have;
input ID$ Tst$ test_rt number;
cards;
1 dp 20 1
1 rp 0 1
1 dp 35 2
1 rp 20 2
1 dp 0 3
1 rp 20 3
;

 
data want;
set have;
by number notsorted;
retain new_number;
if first.number then new_number=test_rt;
if last.number then dif=test_rt -new_number;
run;

Re: unending lines in the series plot of proc template

Jagadishkatam — Fri, 17 Sep 2021 16:00:22 GMT

Thank you @djrisks for your response.

I tried updating the code to use group=usubjid, and this will generate the graph without the unending lines. But it will affect the legend, like it will display two rows for two subjects and if there are many subjects then the same number of rows will be displayed in the legend.

But this is not my expectation, I want to avoid the unending lines but still display only one row for legend as both the subjects took the same dose i.e., 'dose1'.

Re: Filling missing strings form non-missing strings

Jagadishkatam — Fri, 17 Sep 2021 15:00:55 GMT

Proc sort data=have;
by exe_name descending ceoann;
run;

data want;
set have(rename=(ceoann=_ceoann));
by exe_name descending  _ceoann;
retain ceoann;
if first.exe_name then ceoann=_ceoann;
run;

unending lines in the series plot of proc template

Jagadishkatam — Fri, 17 Sep 2021 03:52:23 GMT

Dear Experts,

This is with regard to the unending lines issue observed in the proc template when i use the discreteattrmap. I want to use the discreteattrmap and still avoid the unending lines. Here is the sample code and dummy data, please let us know how i can avoid the unending lines.

data full_subset;
input RGROUP$      USUBJID$     AVISITN MONTH CHANGE;
cards;
dose1 00005 1 0 0
dose1 00005 2 1.3 1.639344262
dose1 00005 3 3.2 10.95081967
dose1 00006 1 0 0
dose1 00006 2 1.3 1.039344262
dose1 00006 3 3.2 16.95081967
;

proc sort data=full_subset;
by rgroup usubjid avisitn;
run;

proc template;
define statgraph sgplot;
begingraph / collation=binary dataContrastColors=( red orange green violet yellow grey ) dataSymbols=( EOT );
SymbolChar char=delta_u NAME=EOT / scale=1;
discreteattrmap name='TGROUPS';
value 'Treatment Ongoing' /markerattrs=(symbol=trianglerightfilled color=black size=12);
enddiscreteattrmap;
discreteattrvar attrvar=TGROUP1 var=TGROUP attrmap='TGROUPS';
discreteattrmap name='RGROUPS';

value 'dose1' /markerattrs=(symbol=squarefilled color=red size=12) Lineattrs=( Pattern=1 Thickness=2 color=red);
enddiscreteattrmap;

discreteattrvar attrvar=RGROUP1 var=rgroup attrmap='RGROUPS';

layout overlay / walldisplay=(fill) xaxisopts=( Label="Time since first dose date (months)" type=linear linearopts=(tickvaluesequence=(start=0 end=15 increment=0.5))) y2axisopts=(labelFitPolicy=Split) yaxisopts=( Label="Tumor size (% change from baseline)" labelFitPolicy=Split type=linear ) y2axisopts=(labelFitPolicy=Split);

SeriesPlot X=month Y=change /xaxis=x yaxis=y Group=RGROUP1 LineColorGroup=RGROUP1 MarkerColorGroup=RGROUP1 markersymbolgroup=rgroup1 display=(markers) LegendLabel="CHANGE" NAME="trt";

 Layout Gridded / Border=true autoalign=(topleft topright) valign=top;

Layout Gridded;

endlayout;

endlayout;

DiscreteLegend "trt" /*"b"*/ / Location=Inside across=1 type=marker halign=right Title ="Dose Level" ValueAttrs=( Size=5) Opaque=true titleattrs=(family="Arial" size=8pt) titleborder=true sortorder=ascendingformatted autoalign=(TOPRIGHT) order=rowmajor border=false valueattrs=(family="Arial" size=8pt) Opaque=true;

endlayout;

endgraph;
end;
run;

proc sgrender data=FULL_SUBSET template=sgplot  ;
run;

What i am expecting is as below, where we can observe the unending lines but the legend is disturbed. I want the legend as dose1 with only 1 row

Please help.

Re: Assign values to a new var by 1st valid value of another var for all records of the same custome

Jagadishkatam — Mon, 13 Sep 2021 16:24:22 GMT

Please try

data have;
input Customer_ID $1 Customer_Cat $3 ;
datalines;
1 A
1 A
1 A
2  
2 B
2 B
3  
3  
3 A
3 C
4  
4  
4 C
4 D
4 D
4 C
;
run;

data first;
set have;
by Customer_ID;
where Customer_Cat ne '';
if first.Customer_ID;
Derived_Customer_Cat =Customer_Cat;
keep Customer_ID Derived_Customer_Cat;
run;

data want2;
merge have(in=a) first(in=b) ;
by Customer_ID;
if a;
run;

Use of SYMBOL for annotation in SGRENDER

Jagadishkatam — Wed, 08 Sep 2021 18:41:04 GMT

Hi Experts,

Here I have a question on how to use the annotation dataset with function='SYMBOL' to display triangle with black color filled. I want to use this annotated dataset in proc SGRENDER with proc template. But I cannot see the symbol plotted in the graph at all. Your inputs are highly appreciated on where I am going wrong.

 DATA anno;
ATTRIB FUNCTION LENGTH = $20;
FUNCTION = "SYMBOL";
text='TRIANGLE';
style='marker';
X1 = 6;
Y1 = 187;
position='3';
anchor='';
size=3;
color='black';
OUTPUT;
RUN;

in the proc template after the overlay i used the annotate statement as well

proc sgrender data=want template=plot sganno=anno;
run;