Making expression containing Bayesian t-test results

expr_t_bayes(
  data,
  x,
  y,
  subject.id = NULL,
  paired = FALSE,
  k = 2L,
  bf.prior = 0.707,
  output = "expression",
  ...
)

Arguments

data

A dataframe (or a tibble) from which variables specified are to be taken. A matrix or tables will not be accepted.

x

The grouping variable from the dataframe data.

y

The response (a.k.a. outcome or dependent) variable from the dataframe data.

subject.id

In case of repeated measures design (paired = TRUE, i.e.), this argument specifies the subject or repeated measures id. Note that if this argument is NULL (which is the default), the function assumes that the data has already been sorted by such an id by the user and creates an internal identifier. So if your data is not sorted and you leave this argument unspecified, the results can be inaccurate.

paired

Logical that decides whether the experimental design is repeated measures/within-subjects or between-subjects. The default is FALSE.

k

Number of digits after decimal point (should be an integer) (Default: k = 2L).

bf.prior

A number between 0.5 and 2 (default 0.707), the prior width to use in calculating Bayes factors.

output

If "expression", will return expression with statistical details, while "dataframe" will return a dataframe containing the results.

...

Additional arguments (currently ignored).

References

For more details, see- https://indrajeetpatil.github.io/statsExpressions/articles/stats_details.html

Examples

# for reproducibility set.seed(123) library(statsExpressions) # ------------- between-subjects design -------------------------- expr_t_bayes( data = mtcars, x = am, y = wt, paired = FALSE )
#> paste("log"["e"], "(BF"["01"], ") = ", "-7.23", ", ", widehat(italic(delta))["median"]^"posterior", #> " = ", "-1.26", ", CI"["95%"]^"HDI", " [", "-1.79", ", ", #> "-0.72", "]", ", ", italic("r")["Cauchy"]^"JZS", " = ", "0.71")
# ------------- within-subjects design ----------------------------- expr_t_bayes( data = dplyr::filter(bugs_long, condition %in% c("LDLF", "LDHF")), x = condition, y = desire, paired = TRUE, subject.id = subject )
#> paste("log"["e"], "(BF"["01"], ") = ", "-15.38", ", ", widehat(italic(delta))["median"]^"posterior", #> " = ", "-1.63", ", CI"["95%"]^"HDI", " [", "-2.12", ", ", #> "-1.13", "]", ", ", italic("r")["Cauchy"]^"JZS", " = ", "0.71")