Changeset 20031 in main

Timestamp:

03/13/20 16:50:07 (2 years ago)

Author:

Paul Leo

Message:

Removing the A's from result page

File:

• adopters/mt/trunk/src/main/backend_qModules/birth23/test/MT_Average_data_frame.def (modified) (5 diffs)

adopters/mt/trunk/src/main/backend_qModules/birth23/test/MT_Average_data_frame.def

@@ -225 +225 @@
  *              2a. If count > 20                                                                                                               ;
  *                      Report count and rates with confidence intervals                                        ;
- *              2b. If count > 20                                                                                                               ;
+ *              2b. If count < 20                                                                                                               ;
  *                      Suppress rates and counts                                                                                       ;
  * ZW-s program uses ".A" to identify cells for suppression.                            ;
@@ -235 +235 @@
  * code at the end of this file to work.                                                                                ;
  *******************************************************************************;
- 
- **************** ASK LOIS ABOUT STDERR COMPUTATIONS ***************************;
 
         data tmp;
@@ -244 +242 @@
 
                 if popcount>=300 then do;
-
                         *   Suppress cells if absolute count <5 ;
                         
                         if 1<=count<5 then do; 
+                                n=.A;
                                 mean=.A;
-                                LL=.A;
-                                UL=.A;
+                                LL=put('**',8.0);
+                                UL=put('**',8.0);
                                 redflag=put('Suppressed', $15.);
-                                n=.A;
-                        end;
-
-                                *   do not compute rates based on fewer than 20 events, but provide counts;
+                        end;
+
+                        *   do not compute rates based on fewer than 20 events, but provide counts;
                         
                         if 5<=count<20 then do;
                                 mean=.A;
-                                LL=.A;
-                                UL=.A;
+                                LL=put('**',8.0);
+                                UL=put('**',8.0);
                                 redflag=put('Suppressed Avg', $16.);
                         end;
 
-                        * for events >= 20 use binomial exact confidence intervals;
-                        
-                        if count >= 20, then do;
-                                LL=put(t1, 8.2);
-                                LL=(1 – betainv (.975, popcount – count – 1, count))*100);
-                                UL=((1 – betainv (.025, popcount – count, count + 1))*100);
-                                LL=compress(LL);
-                                UL=compress(UL);
+                        * for events between 20 and 100, use T distribution to calculate confidence intervals;
+                        * note LL and UL are calculated in step 4 above.;
+
+                        if 20<=count<=100 then do; 
+                        
                                 redflag=put('-', $15.); 
-                        end;
-                        
+
+                        end;
+
+                        * and normal approximation for more than 100 events. ;
+                        * which is also computed in step 4 above;
+
+                        if count>100 then do;
+
+                                redflag=put('-', $15.); 
+                        end;
                 end;
                 
                 if popcount<300 then do;
 
-                        *  suppress if popcount <300 and count < 20 events.             ; 
+                        *  suppress if popcount <300 and count < 20 events; 
                 
                         if 1<=count<20 then do;
+                                n=.A;
                                 mean=.A;
-                                LL=.A;
-                                UL=.A;
+                                LL=put('**',8.0);
+                                UL=put('**',8.0);
                                 redflag=put('Suppressed', $15.);
-                                n=.A;
-                        end;
-                        
-                        
-                        * report rate and n if popcount <300 and count >= 20 events.    ;
-
-                        * for events >= 20 use binomial exact confidence intervals;
-                        
-                        if count >= 20, then do;
-                                LL=put(t1, 8.2);
-                                LL=(1 – betainv (.975, popcount – count – 1, count))*100);
-                                UL=((1 – betainv (.025, popcount – count, count + 1))*100);
-                                LL=compress(LL);
-                                UL=compress(UL);
+                        end;
+                        
+                        
+                        * report rate and n if popcount <300 and count >= 20 events;
+
+                        if 20<=count<=100 then do; 
+                        * for events between 20 and 100, use T distribution to calculate confidence intervals;
+                        * note LL and UL are calculated in step 4 above.;
+                        
+                                redflag=put('-', $15.); 
+
+                        end;
+
+                        *  and normal approximation for more than 100 events. ;
+                        * which is also computed in step 4 above;
+                        
+                        if count>100 then do;
+
                                 redflag=put('-', $15.); 
                         end;
@@ -306 +313 @@
                 if count=0 then do;
                         mean=.A;
-                        LL=.A;
-                        UL=.A;
+                        LL=put('**',8.0);
+                        UL=put('**',8.0);
                 end;
 
                 if count<0 then do;
-                        mean=0;
                         mean=.A;
-                        LL=.A;
-                        UL=.A;
+                        LL=put('**',8.0);
+                        UL=put('**',8.0);
                         redflag=put('No Variance', $15.);  *no variance;
                 end;
@@ -347 +353 @@
  ********************************************************************;
 --------BoNdArY--------
-1 suppressed_variables 4
+1 suppressed_variables 2
 mean
 n
-LL
-UL
---------BoNdArY--------
+--------BoNdArY--------