# \donttest{
# This example is excluded from testing to reduce package check time
do.salamander=function()
{
data(salamander)
occ.p.dot=mark(salamander,model="Occupancy",delete=TRUE)
occ.p.time=mark(salamander,model="Occupancy",
model.parameters=list(p=list(formula=~time)),delete=TRUE)
occ.p.mixture=mark(salamander,model="OccupHet",
model.parameters=list(p=list(formula=~mixture)),delete=TRUE)
return(collect.models())
}
salamander.results=do.salamander()
print(salamander.results)
# }
Run the code above in your browser using DataLab