$`formula:`
bldpww1 ~ floorsz + unemploy + prof


Call:
glm(formula = logformula, family = "binomial", data = spdata)

Deviance Residuals: 
    Min       1Q   Median       3Q      Max  
-2.2680  -0.8506  -0.5775   0.8544   2.2209  

Coefficients:
              Estimate Std. Error z value Pr(>|z|)    
(Intercept) -6.5772834  1.0059901  -6.538 6.23e-11 ***
floorsz      0.0000896  0.0036024   0.025     0.98    
unemploy    51.4277621  7.4031418   6.947 3.74e-12 ***
prof         7.6922822  1.4857931   5.177 2.25e-07 ***
---
Signif. codes:  0 ‘***’ 0.001 ‘**’ 0.01 ‘*’ 0.05 ‘.’ 0.1 ‘ ’ 1

(Dispersion parameter for binomial family taken to be 1)

    Null deviance: 412.08  on 315  degrees of freedom
Residual deviance: 347.06  on 312  degrees of freedom
AIC: 355.06

Number of Fisher Scoring iterations: 3