%init; %inc "\\sasprod01\PrisonersBay\stat_prog\KTE-C19\KTE-C19-101\analysis\Biomarker_MAA_20171208\macro\setup.sas"; proc format; value $avalb (multilabel notsorted) 'CR' = 'CR' 'PR' = 'PR' 'CR', 'PR' = 'Reponders' 'SD' = 'SD' 'PD' = 'PD' 'SD', 'PD' = 'Non-Responders'; quit; * FORMAT _NUMERIC_ MVALUE. _CHARACTER_ $MVALUE.; PROC FORMAT; VALUE MVALUE OTHER='NON-MISSING' .='MISSING'; VALUE $MVALUE OTHER='NON-MISSING' ''='MISSING'; RUN; ods pdf file='\\sasprod01\PrisonersBay\stat_prog\KTE-C19\KTE-C19-101\analysis\Biomarker_MAA_20171208\validation\tfl\popualation_trees.pdf'; * Left join files - keep only condition and by vars; proc sql; create table adsl_adeff_adpcrs as select c.usubjid, c.race, c.sex, c.age, c.agecat, a.saffl, a.mittfl, a.aphase, a.aperiod, a.avalc, a.paramcd as adeff_paramcd, b.paramcd as adpcr_paramcd, b.peakval from ad_12mo.adsl as c left join ad_12mo.adeff as a on c.usubjid=a.usubjid left join ad_12mo.adpcrs as b on a.usubjid=b.usubjid and a.aperiod=b.aperiod; quit; proc sort data=adsl_adeff_adpcrs; by usubjid; run; title 'ADSL_ADEFF_ADPCRS: Best Response - Responder/Non-Responder, MITTL - CR, PR, SD, PD'; proc tabulate data=adsl_adeff_adpcrs; class aphase saffl mittfl adeff_paramcd adpcr_paramcd aperiod race sex agecat; * control display order and group vars; class avalc/preloadfmt mlf order=data; * apply format to group and label missing or non-missing; format avalc $avalb. peakval MVALUE.; var peakval; * (flexible to go multiple rows for each unique value) , (fixed by_var and analysis_var); * ( all row vars with all to separate them ) , ( population*by_var*analysis_var ) * ( stats ); tables (race all sex all agecat all) , (saffl*avalc*peakval)*(median n q1 q3); * all conditions to get one count pt pt; where aperiod=1 and adeff_paramcd='BSTRES01' and aphase ^='Phase1' and saffl='Y' and adpcr_paramcd='nCART'; run; title 'ADSL: Populations, SAFFFL, MITT'; proc tabulate data=ad_12mo.adsl missing noseps; class phase saffl mittfl aphase; tables (saffl all mittfl all) , (phase*aphase all); where aphase ^='Phase1'; run; title 'ADSL: Nested, SAFFFL, MITT'; proc tabulate data=ad_12mo.adsl missing noseps; class phase saffl mittfl; tables (phase*saffl*mittfl all)*(n=''); run; title 'ADEFF: Best Response - Responder/Non-Responder, SAFFL - CR, PR, SD, PD'; proc tabulate data=ad_12mo.adeff missing noseps; class aphase saffl mittfl; class avalc/preloadfmt mlf order=data; format avalc $avalb.; *tables (avalc all) , (aphase*saffl saffl*all all); tables (avalc all) , (aphase*saffl all); where paramcd='BSTRES01' and phase ^='Phase1' and saffl='Y'; run; title 'ADEFF: Best Response - Responder/Non-Responder, MITTL - CR, PR, SD, PD'; proc tabulate data=ad_12mo.adeff missing noseps; class aphase saffl mittfl; class avalc/preloadfmt mlf order=data; format avalc $avalb.; tables (avalc all) , (aphase*mittfl mittfl*all all); where paramcd='BSTRES01' and aphase ^='Phase1' and mittfl='Y'; run; * Left join files - keep only condition and by vars; proc sql; create table adeff_adbmk as select a.usubjid, a.saffl, a.mittfl, a.aphase, a.aperiod, a.avalc, a.paramcd as adeff_paramcd, b.paramcd as adbmk_paramcd, b.avisit, b.aval from ad_12mo.adeff as a left join ad_12mo.adbmk as b on a.usubjid=b.usubjid and a.aperiod=b.aperiod; quit; proc sort data=adeff_adbmk; by usubjid; run; title 'ADEFF_ADBMK: Best Response - Responder/Non-Responder, MITTL - CR, PR, SD, PD'; proc tabulate data=adeff_adbmk ; class aphase saffl mittfl AVISIT adeff_paramcd adbmk_paramcd aperiod; class avalc/preloadfmt mlf order=data; format avalc $avalb. aval MVALUE.; var aval; tables (aperiod*adeff_paramcd*adbmk_paramcd*AVISIT*avalc all) , (aphase*mittfl*aval*n mittfl*all*aval*n); where adeff_paramcd='BSTRES01' and aphase ^='Phase1' and mittfl='Y' and Compress(AVISIT) in ('BASELINE', 'DAY0', 'DAY1') and adbmk_paramcd='AMYLOIDA'; run; title 'Detail: ADEFF_ADBMK: Best Response - Responder/Non-Responder, MITTL - CR, PR, SD, PD'; proc freq data=adeff_adbmk; tables aperiod*adeff_paramcd*adbmk_paramcd*AVISIT*avalc*aphase*mittfl*aval/list; format aval MVALUE.; where adeff_paramcd='BSTRES01' and aphase ^='Phase1' and mittfl='Y' and Compress(AVISIT) in ('BASELINE', 'DAY0', 'DAY1') and adbmk_paramcd='AMYLOIDA'; run; title 'USUBJID ADEFF_ADBMK: Best Response - Responder/Non-Responder, MITTL - CR, PR, SD, PD'; proc freq data=adeff_adbmk; tables usubjid*aperiod*adeff_paramcd*adbmk_paramcd*AVISIT*avalc*aphase*mittfl*aval/list; format aval MVALUE.; where adeff_paramcd='BSTRES01' and aphase ^='Phase1' and mittfl='Y' and Compress(AVISIT) in ('BASELINE') and adbmk_paramcd='AMYLOIDA' and avalc in ('CR' 'PR'); run; title 'LOOKUP: NE G3+, CRS G3+'; proc tabulate data=lookup.safety_primary_analysis_ch3 missing noseps; class nt3plus crs3plus; tables nt3plus all crs3plus all ; run; ods pdf close;