1 OPTIONS NONOTES NOSTIMER NOSOURCE NOSYNTAXCHECK;7071 /*************************** berkeley.sas *********************************/72 title 'Berkeley Graduate Admissions Data: ';7374 proc format;75 value sexfmt 1 = 'Female' 0 = 'Male';NOTE: Format SEXFMT is already on the library WORK.FORMATS.NOTE: Format SEXFMT has been output.76 value ynfmt 1 = 'Yes' 0 = 'No';NOTE: Format YNFMT is already on the library WORK.FORMATS.NOTE: Format YNFMT has been output.NOTE: PROCEDURE FORMAT used (Total process time):real time 0.00 secondsuser cpu time 0.00 secondssystem cpu time 0.00 secondsmemory 244.37kOS Memory 29092.00kTimestamp 01/05/2020 08:27:57 PMStep Count 33 Switch Count 0Page Faults 0Page Reclaims 29Page Swaps 0Voluntary Context Switches 0Involuntary Context Switches 0Block Input Operations 0Block Output Operations 3277 data berkley;78 input line sex dept $ admit count;79 format sex sexfmt.; format admit ynfmt.;80 datalines;NOTE: The data set WORK.BERKLEY has 24 observations and 5 variables.NOTE: DATA statement used (Total process time):real time 0.00 secondsuser cpu time 0.01 secondssystem cpu time 0.00 secondsmemory 672.09kOS Memory 29608.00kTimestamp 01/05/2020 08:27:57 PMStep Count 34 Switch Count 2Page Faults 0Page Reclaims 152Page Swaps 0Voluntary Context Switches 9Involuntary Context Switches 0Block Input Operations 0Block Output Operations 264105 ;106 proc freq;107 tables sex*admit / nopercent nocol chisq;108 tables dept*sex*admit / nopercent nocol chisq;109 tables dept*sex / nopercent nocol chisq;110 tables dept*admit / nopercent nocol chisq;111 weight count;112113114 /* Get p-value */NOTE: There were 24 observations read from the data set WORK.BERKLEY.NOTE: PROCEDURE FREQ used (Total process time):real time 0.32 secondsuser cpu time 0.32 secondssystem cpu time 0.00 secondsmemory 3793.37kOS Memory 31408.00kTimestamp 01/05/2020 08:27:57 PMStep Count 35 Switch Count 4Page Faults 0Page Reclaims 436Page Swaps 0Voluntary Context Switches 19Involuntary Context Switches 0Block Input Operations 0Block Output Operations 672115 proc iml;NOTE: IML Ready116 x = 17.2480 + 0.2537 + 0.7535 + 0.2980 + 1.0011 + 0.3841;117 pval = 1-probchi(x,6);118 print "Pooled chisquare = " x "df=6, p = " pval;119 Bonferroni = 0.05/6;120 print "Reject with Bonferroni correction if p <" Bonferroni;121122123 OPTIONS NONOTES NOSTIMER NOSOURCE NOSYNTAXCHECK;134