added test for obs_by in predict.jags_analysis and ensure data[,,drop = TRUE] in predict.jags_analysis function