test_fisher {uxr}

Fisher's Test

Description

Fisher's Test

Usage

test_fisher(data, x, y)

Arguments

data

data

x

x

y

y

Value

results

Examples

design = c("A","B")
complete = c(11, 5)
incomplete = c(1, 5)
data <- data.frame(design, complete, incomplete)
data <- data |> tidyr::pivot_longer(!design, names_to = "rate", values_to = "n") |>
  tidyr::uncount(n)
test_fisher(data, design, rate)