Analyse Doob Affidavit Table 1 — 5-year average annual releases

Renders Table 1 and computes overall success / revocation rates.

Usage

analyze_doob_table1_releases()

Value

A morie_result named-list with title, summary_lines, tables, interpretation, and payload.

Examples

res <- analyze_doob_table1_releases()
head(res$summary_lines)
#> [[1]]
#> [1] "Source"                                       
#> [2] "CCRSO 2018 pp.94-98, Doob Affidavit Exhibit B"
#> 
#> [[2]]
#> [1] "Total annual releases (5-yr avg)" "10245"                           
#> 
#> [[3]]
#> [1] "Total annual revoke-violent (5-yr avg)"
#> [2] "94.4"                                  
#> 
#> [[4]]
#> [1] "Overall violent-revocation rate" "0.921%"                         
#> 
#> [[5]]
#> [1] "Doob's headline point"                                                                            
#> [2] ">= 99.4% of releases are successful or non-violent-revoked -- the violent-revocation rate is < 1%"
#>