Skip to contents

Describe Hartigans' dip test results

Usage

# S3 method for class 'dip.test'
apa(obj, ...)

Arguments

obj

a result from diptest::dip.test

...

other parameters passed to format_results

Value

formatted results string

Examples

if (requireNamespace("diptest", quietly = TRUE)) {
  # Generate bimodal data
  bimodal_data <- c(rnorm(100, -2, 1), rnorm(100, 2, 1))
  
  # Perform dip test
  dip_result <- diptest::dip.test(bimodal_data)
  
  # Format results in APA style
  apa(dip_result)
}
#> [1] "_D_ = 0.06, _p_ < .001"