1          OPTIONS NONOTES NOSTIMER NOSOURCE NOSYNTAXCHECK;
 55         
 56         /******************** ClassicalNoise.sas **************************
 57         * Participants listened to political discussions under different  *
 58         * levels of background noise. "Discrimination score" is a measure *
 59         * of how well they could tell what was being said.                *
 60         ******************************************************************/
 61         
 62         title 'Noise data';
 63         
 64         proc format;
 64       !                   value sexfmt    0 = 'Male'  1 = 'Female' ;
 NOTE: Format SEXFMT is already on the library WORK.FORMATS.
 NOTE: Format SEXFMT has been output.
 65         
 
 NOTE: PROCEDURE FORMAT used (Total process time):
       real time           0.00 seconds
       cpu time            0.00 seconds
       
 66         data loud;
 
 67              infile '/folders/myfolders/noise.data.txt';  /* Univariate data read */
 68              input ident  interest  sex  age  noise  time  discrim ;
 69              format sex sexfmt.;
 70              label interest = 'Interest in topic (politics)'
 71                    time     = 'Order of presenting noise level';
 72         
 
 NOTE: The infile '/folders/myfolders/noise.data.txt' is:
       Filename=/folders/myfolders/noise.data.txt,
       Owner Name=root,Group Name=vboxsf,
       Access Permission=-rwxrwx---,
       Last Modified=07Mar2016:23:31:45,
       File Size (bytes)=8700
 
 NOTE: 300 records were read from the infile '/folders/myfolders/noise.data.txt'.
       The minimum record length was 27.
       The maximum record length was 27.
 NOTE: The data set WORK.LOUD has 300 observations and 7 variables.
 NOTE: DATA statement used (Total process time):
       real time           0.01 seconds
       cpu time            0.00 seconds
       
 73         proc freq;
 
 74              tables sex*age*noise / norow nocol nopercent;
 75         
 
 NOTE: There were 300 observations read from the data set WORK.LOUD.
 NOTE: PROCEDURE FREQ used (Total process time):
       real time           0.07 seconds
       cpu time            0.08 seconds
       
 76         proc glm;
 
 77              title2 'Classical mixed model repeated measures';
 78              class ident age sex noise;
 79              model discrim = age|sex|noise ident(age*sex);
 80              random ident(age*sex) / test;
 81              means noise age;
 82         
 83         /* Expected mean squares show that not all the hypotheses
 84            are testable with the classical mixed model approach.
 85            SAS is buying testability of the hypotheses by assuming
 86            that you're only interested in an effect if all the
 87            higher-order interactions involving that effect are
 88            absent.
 89         
 90            Also, we can't use the covariate and it's not clear how
 91            to do multiple comparisons.  */
 92         
 93         
 94         
 95         
 96         
 97         
 98         OPTIONS NONOTES NOSTIMER NOSOURCE NOSYNTAXCHECK;
 110