File: test-contingencyBF.R

package info (click to toggle)
r-cran-bayesfactor 0.9.12-4.7%2Bdfsg-1
  • links: PTS, VCS
  • area: main
  • in suites: forky, sid, trixie
  • size: 1,492 kB
  • sloc: cpp: 1,555; sh: 16; makefile: 7
file content (12 lines) | stat: -rw-r--r-- 493 bytes parent folder | download | duplicates (3)
1
2
3
4
5
6
7
8
9
10
11
12

context("contingencyBF")

test_that("contingencyBF works", {
  data <- matrix(c(3, 6, 4, 9), nrow=2)
  contingencyTableBF(data, sampleType='poisson')
  contingencyTableBF(data, sampleType='jointMulti', fixedMargin='rows')
  contingencyTableBF(data, sampleType='jointMulti', fixedMargin='cols')
  contingencyTableBF(data, sampleType='indepMulti', fixedMargin='rows')
  contingencyTableBF(data, sampleType='indepMulti', fixedMargin='cols')
  contingencyTableBF(data, sampleType='hypergeom')
})