minor bug in printing out warning of indicators with all missing values (actual change in data is ok)

[jarathomas]

InSilicoVA/InSilicoVA/R/insilico_core.r

Line 1084 in 9a2eb17

paste( probbase[missing.all + 1, 2-as.numeric(data.type == "WHO2016")], collapse = ", ")),

External causes have not been removed from probbase, so I think the indexing is off. Something like

 paste( probbase[-external.symps, ][missing.all + 1, 2-as.numeric(data.type == "WHO2016")], collapse = ", ")), 

should do the trick. This is a bit ugly, so maybe include probbase_no_ext <- probbase[-external.symps,] outside/before the call to warning() and then use probbase_no_ext[missing.all + 1, ... in the referenced line.