File: test-anovaBF.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-- 291 bytes parent folder | download | duplicates (3) 
1
2
3
4
5
6
7
8
9
10
11
12
 

context("anovaBF")

test_that("Puzzles example works", {
  data(puzzles)

  bf = anovaBF(RT ~ shape*color + ID, data = puzzles, whichRandom = "ID",
               iterations=1000, progress = FALSE)

  expect_that(bf, is_a("BFBayesFactor"))
  expect_that(length(bf), is_equivalent_to(4))
})