nwos_plot_response_rate_replicates_state: NWOS Plot Response Rates for Replicates by State

View source: R/nwos_plot_response_rate_replicates_state.R

nwos_plot_response_rate_replicates_stateR Documentation

NWOS Plot Response Rates for Replicates by State

Description

This function calculates response rates for NWOS replicates and is designed to be used with an apply function, such as sapply.

Usage

nwos_response_rate_replicates_state(state, data = po, s.name = "FFO", r.name = "RESPONSE")

Arguments

state

= state

data

= po

s.name

= "FFO"

r.name

= "RESPONSE"

Value

Response rate in the stratum.

References

Butler, B.J. In review. Weighting for the US Forest Service, National Woodland Owner Survey. U.S. Department of Agriculture, Forest Service, Northern Research Station. Newotwn Square, PA.

Examples

wi <- tbl_df(read.csv("data/wi.csv")) %>% mutate(ROW_NAME = row.names(wi), AC_WOOD = ACRES_FOREST, FFO = if_else(LAND_USE == 1 & OWN_CD == 45 & AC_WOOD >= 1, 1, 0), RESPONSE = if_else(RESPONSE_PROPENSITY >= 0.5, 1, 0), RESPONSE = if_else(is.na(RESPONSE_PROPENSITY), 0, RESPONSE))
WI_FFO_RR_REP <- sapply(WI_REPLICATES, nwos_response_rate_apply, index = wi$ROW_NAME, stratum = wi$FFO, response = wi$RESPONSE)
WI_FFO_RR_REP

familyforestresearchcenter/nwos documentation built on April 12, 2025, 11:54 a.m.