# GoosePermits: Goose Permit Study In mosaicData: Project MOSAIC Data Sets

 GoosePermits R Documentation

## Goose Permit Study

### Description

237 hunters were each offered one of 11 cash amounts (bids) ranging from \$1 to \$200 in return for their goose permits. Hunters returned either their permit or the cash.

### Usage

``````data(GoosePermits)
``````

### Format

A data.frame with 11 observations on the following 3 variables.

`bid `

amount offered for permit (US \$) (numeric)

`keep `

number of hunters who kept the permit and returned the cash (numeric)

`sell `

number of hunters who kept the cash and returned the permit (numeric)

### Source

Bishop and Heberlein. "Measuring values of extramarket goods: are indirect measures biased?". Amer. J. Agr. Econ. 61, 1979. Available at https://onlinelibrary.wiley.com/doi/abs/10.2307/3180348

### Examples

``````data(GoosePermits)

goose.model <-
glm( cbind(keep, sell) ~ log(bid), data = GoosePermits, family = binomial())
if (require(ggformula)) {
y.hat <- makeFun(goose.model)
gf_point( (keep/(keep+sell)) ~ bid, data = GoosePermits, ylim = c(0,1.05)) |>
gf_fun(y.hat(b) ~ b, add = TRUE, color = "red", alpha = 0.5)
}

``````

mosaicData documentation built on Nov. 5, 2023, 9:06 a.m.