`R/BSDA-package.R`

`Statelaw.Rd`

Data for Exercise 6.62

`Statelaw`

A data frame/tibble with 50 observations on two variables

- state
U.S. state

- cost
dollars spent per resident on law enforcement

Bureau of Justice Statistics, *Law Enforcement Management and
Administrative Statistics, 1993*, NCJ-148825, September 1995, page 84.

Kitchens, L. J. (2003) *Basic Statistics and Data Analysis*.
Pacific Grove, CA: Brooks/Cole, a division of Thomson Learning.

```
EDA(Statelaw$cost)
#> [1] "Statelaw$cost"
#> Size (n) Missing Minimum 1st Qu Mean Median TrMean 3rd Qu
#> 46.000 4.000 1.000 3.000 8.957 5.500 7.571 11.000
#> Max. Stdev. Var. SE Mean I.Q.R. Range Kurtosis Skewness
#> 59.000 10.696 114.398 1.577 8.000 58.000 8.676 2.705
#> SW p-val
#> 0.000
SIGN.test(Statelaw$cost, md = 8, alternative = "less")
#>
#> One-sample Sign-Test
#>
#> data: Statelaw$cost
#> s = 15, p-value = 0.05864
#> alternative hypothesis: true median is less than 8
#> 95 percent confidence interval:
#> -Inf 8
#> sample estimates:
#> median of x
#> 5.5
#>
#> Achieved and Interpolated Confidence Intervals:
#>
#> Conf.Level L.E.pt U.E.pt
#> Lower Achieved CI 0.9481 -Inf 8
#> Interpolated CI 0.9500 -Inf 8
#> Upper Achieved CI 0.9730 -Inf 8
#>
```