Looking at the source code for mice.impute.polyreg:
mice.impute.polyreg
mice.impute.polyreg <- function(y, ry, x, wy = NULL, nnet.maxit = 100,