this function returns a unique model is variable receive each mapeda variable ex .: criaModeloExclusivo (modeloCamposLeite, c ("age1", "age2", "bai1", "s"))
criaModeloExclusivo(modeloGenerico, variaveis, palpite = NULL)
model of pattern criaModeloGenerico
list of name fields (strings) in database and model, the order of variables matter
string containing start values of function of regression
will be returned a function with exclusive model