Matt---

 

I'm getting an error message I haven't seen before...

 

            "Error in newx[, j - 1] <- ifelse(x[, i] == values[j], 1, 0) :

            subscript out of bounds"

 

-------------------------------------------

My settings are as follows:

 

impruns            <-  5

tolerX               <-  1.0E-4

autopriX            <-  0.05

empriX              <-  round( 0.005* colDATA8* rowDATA8, digits= 0)

 

   imputed <- amelia(DATA8i,

                     m  = impruns   ,  p2s = 2     ,                      idvars = c(3,4,5)   ,

                     ts = 1         ,  cs  = 2  , polytime  = NULL,

                                                   startvals = 0   ,       tolerance = tolerX  ,

                                                                        noms = nomIV8ji     ,

                     ords = ordIV8ji,  incheck = T , collect = F     , outname = "DATA8imp",

                     write.out = T  ,  archive = T ,                   keep.data = T       ,

                     empri = empriX ,                                   autopri = autopriX  ,

                     bounds = IVlims,                 max.resample = resampleX                 )

 

The input files are attached.

 

-------------------------------------------

 

Thanks much for your help…

 

Wayne

 

 

Wayne A. Thornton

 

Harvard University

thornton@fas.harvard.edu