weightedDetection: weightedDetection

Description Usage Arguments Examples

Description

Calculate the probability of detecting a species with weighted occurrences and visits

Usage

1
2
3
4
5
weightedDetection(occWeights = data.frame(sites = 1:10, weights = c(0.05,
  0.05, 0.05, 0.05, 0.1, 0.1, 0.1, 0.1, 0.2, 0.2)),
  visWeights = data.frame(sites = 1:10, weights = c(0.05, 0.05, 0.05,
  0.05, 0.1, 0.1, 0.1, 0.1, 0.2, 0.2)), noOccur = 5, noLocations = 5,
  noVisits = 5, detectProb = 0.1, nIter = 999)

Arguments

occWeights

occurrenceWeights

Examples

 1
 2
 3
 4
 5
 6
 7
 8
 9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
## Not run: 

tt <- weightedDetection(noOccur = 1,
noLocations = 1:10,
detectProb =  0.5)

plot(tt)

occ <- createOccProb(map10km)

visWeights <- occ %>%
 select(sites = ssbid,
         weights = prob)

system.time(tt <- weightedDetection(occWeights = visWeights,
                                    visWeights = visWeights,
                                    noOccur = 100,
                                    noLocations = seq(10, 100, by = 10),
                                    noVisits = 5
))



## End(Not run)

NINAnor/SurveyPower documentation built on May 7, 2019, 10:43 p.m.