Reports interpretation of S- and p-values in easy language.

## Examples

```
report_s(s = 1.5)
#> If the test hypothesis (parameter = 0) and all model assumptions were
#> true, there is a 35% chance of observing this outcome. How weird is
#> that? It's hardly more surprising than getting 2 heads in a row with
#> fair coin tosses.
report_s(p = 0.05)
#> If the test hypothesis (parameter = 0) and all model assumptions were
#> true, there is a 5% chance of observing this outcome. How weird is that?
#> It's hardly more surprising than getting 4 heads in a row with fair coin
#> tosses.
```