Existe uma maneira fácil de combinar dois modelos glm em R?

Eu tenho dois modelos de regressão logística em R feitos com glm(). Ambos usam as mesmas variáveis, mas foram criados usando diferentes subconjuntos de uma matriz. Existe uma maneira fácil de obter um modelo médio que forneça os meios dos coeficientes e depois usá-lo com a função predict ()?

[desculpe se esse tipo de pergunta deve ser postado em um site de programação, deixe-me saber e eu o postarei]

obrigado

Deseja obter a média das probabilidades previstas ou a média dos coeficientes? Eles fornecerão resultados diferentes, porque uma regressão logística envolve uma transformação não linear do preditor linear.

Uma função para fazer qualquer um seria algo parecido com isto. Defina avgpara "prob"obter o primeiro ou algo mais para o último.

pred_comb <- function(mod1, mod2, dat, avg="prob", ...)
{
    xb1 <- predict(mod1, dat, type="link", ...)
    xb2 <- predict(mod2, dat, type="link", ...)
    if(avg == "prob")
        (plogis(xb1) + plogis(xb2))/2
    else plogis((xb1 + xb2)/2)
}