# R Dataset / Package mosaicData / GoosePermits

Webform
Category

Webform
Category

Webform
Category

Webform
Category

Webform
Category

Webform
Category

## Visual Summaries

Embed
<iframe src="https://embed.picostat.com/r-dataset-package-mosaicdata-goosepermits.html" frameBorder="0" width="100%" height="307px" />
Attachment Size
115 bytes
Dataset Help

On this Picostat.com statistics page, you will find information about the GoosePermits data set which pertains to Goose Permit Study. The GoosePermits data set is found in the mosaicData R package. You can load the GoosePermits data set in R by issuing the following command at the console data("GoosePermits"). This will load the data into a variable called GoosePermits. If R says the GoosePermits data set is not found, you can try installing the package by issuing this command install.packages("mosaicData") and then attempt to reload the data. If you need to download R, you can go to the R project website. You can download a CSV (comma separated values) version of the GoosePermits R data set. The size of this file is about 115 bytes.

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.

itemcodebid amount offered for permit (US \$) [numeric] itemcodekeep number of hunters who kept the permit and returned the cash [numeric] itemcodesell 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 http://www1.udel.edu/johnmack/frec343/bishop_and_heberlein.pdf. See also http://www.math.umt.edu/patterson/ProfileLikelihoodCI.pdf.

### Examples

data(GoosePermits)goose.model <-
glm( cbind(keep, sell) ~ log(bid), data = GoosePermits, family = binomial())
if (require(mosaic)) {
f <- makeFun(goose.model)
xyplot( (keep/(keep+sell)) ~ bid, data = GoosePermits, ylim = c(0,1.05))
plotFun( f(b) ~ b, add = TRUE)
}
--

Dataset imported from https://www.r-project.org.

Recent Queries For This Dataset

No queries made on this dataset yet.