change n <<- as.numeric.. to as.integer in glmResp