Changeset 19761 in main

Timestamp:

01/28/20 09:27:18 (2 months ago)

Author:

Maria Baron

Message:

latest NJVDRS edits

File:

• adopters/nj/trunk/src/main/ibisq/qModules-2.2/vdrs/AgeRate.def (modified) (9 diffs)

adopters/nj/trunk/src/main/ibisq/qModules-2.2/vdrs/AgeRate.def

@@ -4 +4 @@
 #f data_where %cross1% %cross2%^=99
 # pop_where %cross2%=1&and&15<=age<=44
+f small_num 20
+f small_pop 20
+
 #########################################
 --------BoNdArY--------
 1 script
-data tmp;
-  set tmp;
-x=1;
-agepop=agegroup;
-run; 
-
+ 
  proc summary data=tmp;
  var x;
@@ -30 +28 @@
  proc summary data=poptmp;
  var popcount;
- class agegrp  %popcross1% %popcross2%;
+ class agepop  %popcross1% %popcross2%;
  output out=pop sum=popnum;
  run;
@@ -36 +34 @@
 data pop;
   set pop;
-if agegrp=. then agegrp=-1;
+if agepop=. then agepop=-1;
 ?popcross1? if %popcross1%=. then %cross1%=-1;
 ?popcross2? if %popcross2%=. then %cross2%=-1;
@@ -46 +44 @@
  set pop.morstd;
  if (stdyr=2000);
-stdpop=stdpop/100; /*add to 1*/
  run;
  proc sort data=stdpop;
  by agepop;
  run;
-proc print data=stdpop;
-title 'stdpop';
-run;
 
  proc sql;
@@ -59 +53 @@
  select tmp.*, pop.*, stdpop.*
  from tmp, pop, stdpop
- where tmp.agepop=pop.agegrp
+ where tmp.agepop=pop.agepop
  and tmp.agepop=stdpop.agepop
  ?popcross1? and tmp.%cross1%=pop.%popcross1% 
@@ -90 +84 @@
  select number.*, pop.*
  from number, pop
- where pop.agegrp=-1 
+ where pop.agepop=-1 
 ?popcross1? and number.%cross1%=pop.%popcross1%
 ?popcross2? and number.%cross2%=pop.%popcross2%
@@ -105 +99 @@
 ?cross2? if %cross2%=. then delete;
 
- *rate=rate/100;
+ rate=rate/100;
  stdev=1.96*sqrt(rate*(1-rate)/popnum);
  t1=(rate-stdev)*100000;
@@ -111 +105 @@
  r1=put(t1, 8.2);
  r2=put((rate+stdev)*100000, 8.2);
-rate=rate*100000;
-cv=100*sqrt((100000/popnum)/rate);
-
+ rate=rate*100000;
  r1=compress(r1);
  r2=compress(r2);
@@ -138 +130 @@
  n 15.0
  popnum 15.0
- r1 15.2
- r2 15.2
- cv 7.4
+ r1 15.
+ r2 15.
 --------BoNdArY--------
---------BoNdArY--------
-1 suppressed_variables 2
-rate
-n
---------BoNdArY--------
-