SEs for Multinomial Proportions
Examples
phat <- table(iris$Species) / nrow(iris)
seMNprops(nrow(iris), phat)
#> $ses
#>
#> setosa versicolor virginica
#> 0.03849002 0.03849002 0.03849002
#>
#> $ses.diffs
#>
#> setosa versicolor virginica
#> setosa 0.00000000 0.06666667 0.06666667
#> versicolor 0.06666667 0.00000000 0.06666667
#> virginica 0.06666667 0.06666667 0.00000000
#>
#> attr(,"class")
#> [1] "ses.moecalc"