## Not run:
#
# data(birds)
# woodthrushUMF <- unmarkedFrameOccu(woodthrush.bin)
# # survey occasion-specific detection probabilities
# (fm.wood.rn <- occuRN(~ obsNum ~ 1, woodthrushUMF))
#
# # Empirical Bayes estimates of abundance at each site
# re <- ranef(fm.wood.rn)
# plot(re)
#
#
# ## End(Not run)
Run the code above in your browser using DataLab