R/identify.statcheck.R

Defines functions identify.statcheck

Documented in identify.statcheck

identify.statcheck <-
  function(x,
           alpha = .05,
           ...) {
    reported <- x$Reported.P.Value
    computed <- x$Computed
    
    # replace 'ns' for > alpha
    reported[x$Reported.Comparison == "ns"] <- alpha
    
    plot(x, APAstyle = FALSE, ...) # makes use of the plot.statcheck() function
    ID <- identify(reported, computed)
    
    res <- x[ID,]
    class(res) <- c("statcheck", "data.frame")
    
    return(res)
  }

Try the statcheck package in your browser

Any scripts or data that you put into this service are public.

statcheck documentation built on May 2, 2019, 9:19 a.m.