# NOT RUN {
set.seed(123)
# creating a dataframe with stats results
stats_df <- cbind.data.frame(
statistic = 5.494,
parameter = 29.234,
p.value = 0.00001
)
# creating a dataframe with effect size results
effsize_df <- cbind.data.frame(
estimate = -1.980,
conf.low = -2.873,
conf.high = -1.088
)
# subtitle for *t*-statistic with Cohen's *d* as effect size
statsExpressions::expr_template(
no.parameters = 1L,
stats.df = stats_df,
effsize.df = effsize_df,
statistic.text = quote(italic("t")),
effsize.text = quote(italic("d")),
n = 32L,
conf.level = 0.95,
k = 3L,
k.parameter = 3L
)
# }
Run the code above in your browser using DataLab