Корреляция в двумерном пробите в R

Question

Мы установили двумерную пробитную модель в R, применив

    z.out1 <-zelig(cbind(Y1, Y2 ~ X1+X2+X3,

                   model = "bprobit", data = data)

    #summary(z.out1)

    x.out <- setx(z.out1)

#summary(x.out)

s.out <- sim(z.out1, x = x.out)

summary(s.out)

, и нас интересует корреляция между двумя уравнениями (rho).Где мы находим это в выводе?