generate.sample.dp: Survey Sample of Double Platform Method

Description Usage Arguments Details Value See Also Examples

Description

This function uses the data stored in the 'pars.survey.dp´ object to create a new sample object.

Usage

1
        generate.sample.dp(pars.survey.dp)

Arguments

pars.survey.dp

Parameter object returned by the function setpars.survey.dp

Details

A survey sample of the double platform method is generated as sample object. generate.sample.dp works with the object 'pars.survey.dp´ that was generated by the function setpars.survey.dp. setpars.survey.dp has to be run prior.

Value

generate.sample.dp returns an object of class 'sample.dp´ which has the following elements:

population

object of class 'population´.

design

object of class 'design.dp´.

detected.observer1

vector indicating which animal groups have been detected by observer 1. NA means that an animal group was outside all survey units and could not be detected. 0 indicates that an animal group was inside a survey unit however has not been detected. 1 means that an animal group was inside a survey unit and has been detected by the observer.

detected.observer2

vector indicating which animal groups have been detected by observer 2. NA means that an animal group was outside all survey units and could not be detected. 0 indicates that an animal group was inside a survey unit however has not been detected. 1 means that an animal group was inside a survey unit and has been detected by the observer.

distance

vector of perpendicular distances of animal groups inside the survey units from the respective transect paths.

transect

vector of transect path numbers of detectable animal groups.

See Also

setpars.survey.dp, summary.sample.dp plot.sample.dp

Examples

 1
 2
 3
 4
 5
 6
 7
 8
 9
10
11
12
13
14
15
16
dp.reg <- generate.region(x.length = 100, y.width = 50)
dp.dens <- generate.density(dp.reg)

#heterogeneous population
dp.poppars<-setpars.population(density.pop = dp.dens, number.groups = 1000, size.method = "poisson",
                               size.min = 1, size.max = 30, size.mean = 10, exposure.method = "beta",
                               exposure.min = 0, exposure.max = 1, exposure.mean = 0.4,
                               exposure.shape = 0.5, type.values=c("Male","Female"), type.prob=c(0.48,0.52))
dp.pop<-generate.population(dp.poppars)
dp.despars<-setpars.design.dp(dp.reg, n.transects=10, n.units=10, visual.range=2, percent.on.effort=1)
dp.des<-generate.design.dp(dp.despars, seed=3)
dp.survpars<-setpars.survey.dp(dp.pop, dp.des, theta.obs1=0.7, theta.obs2=0.4, theta.exp=0.2, theta.dist=-0.7)

dp.samp<-generate.sample.dp(dp.survpars)
summary(dp.samp)
plot(dp.samp)

dill/wisp documentation built on May 15, 2019, 8:31 a.m.