didacticPlot
didacticPlot is useful for making ggplot2 plots of distributions of t, F, Chi^2, and Pearson r, showing a given value, and shading the arie covering the more extreme values. didacticPlotTheme is the basic theme.
didacticPlot(foundValue, statistic, df1, df2 = NULL, granularity = 1000, xLim = NULL, yLab = NULL, lineCol = "red", lineSize=1, surfaceCol = "red", textMarginFactor = 20, sided="two") didacticPlotTheme(base_size = 14, base_family = "")
Arguments
| foundValue | The value to indicate (the 'found' value). |
|---|---|
| statistic | One of "r", "t", "f" or "chisq". |
| df1, df2 | The degrees of freedom; only use df1 for the r, t and chi^2 test; for the F-test, use df1 for the degrees of freedom of the denominator and df2 for the degrees of freedom of the numerator. |
| granularity | Steps to use for x-axis. |
| xLim | Vector; minimum and maximum values on x axis. |
| yLab | Label on y axis. |
| lineCol | Colour of density line. |
| lineSize | Size of density line. |
| surfaceCol | Colour of coloured surface area. |
| textMarginFactor | Used to calculate how close to the vertical line text labels should appear. |
| sided | Whether to make a plot for a 2-sided or 1-sided test. |
| base_size, base_family | Passed on to the grey ggplot theme. |
Value
didacticPlot returns an object that contains the plot in the $plot element.
Examples
didacticPlot(1, statistic='chisq', df1=2);#> Warning: `panel.margin` is deprecated. Please use `panel.spacing` property instead#> Warning: Ignoring unknown aesthetics: x.lo, x.hi#> Warning: Ignoring unknown aesthetics: x.lo, x.hididacticPlot(1, statistic='t', df1=40);#> Warning: `panel.margin` is deprecated. Please use `panel.spacing` property instead#> Warning: Ignoring unknown aesthetics: x.lo, x.hi#> Warning: Ignoring unknown aesthetics: x.lo, x.hididacticPlot(2.02, statistic='t', df1=40, textMarginFactor=25);#> Warning: `panel.margin` is deprecated. Please use `panel.spacing` property instead#> Warning: Ignoring unknown aesthetics: x.lo, x.hi#> Warning: Ignoring unknown aesthetics: x.lo, x.hi### Two sample t-test for n1 = n2 = 250, showing ### p-value of 5% # a<-didacticPlot(1.96, statistic='t', df1=498);
