Risk Exchange Matrix

Creates a cross-comparison matrix showing how many of activity B equal one of activity A, for a selected set of activities.

Usage

risk_exchange_matrix(activities = NULL, risks = NULL)

Arguments

activities

Character vector of activity names to include. Defaults to a curated set of 10 diverse activities.

risks

A tibble with at least activity and micromorts columns. Defaults to common_risks().

Value

A tibble where rows are activities and columns are exchange rates. Cell (i, j) = "how many of activity j equal one of activity i".

See also

risk_equivalence()

Examples

risk_exchange_matrix()
#> # A tibble: 10 × 11
#>    activity         General anesthesia (…¹ `Skydiving (US)` `Running a marathon`
#>    <chr>                             <dbl>            <dbl>                <dbl>
#>  1 General anesthe…                    1                1.2                  1.4
#>  2 Skydiving (US)                      0.8              1                    1.1
#>  3 Running a marat…                    0.7              0.9                  1  
#>  4 Scuba diving, t…                    0.5              0.6                  0.7
#>  5 Driving (230 mi…                    0.1              0.1                  0.1
#>  6 Skiing                              0.1              0.1                  0.1
#>  7 Flying (8h long…                    0.4              0.5                  0.6
#>  8 Chest X-ray (ra…                    0                0                    0  
#>  9 Cup of coffee                       0                0                    0  
#> 10 Crossing a road                     0                0                    0  
#> # ℹ abbreviated name: ¹​`General anesthesia (emergency)`
#> # ℹ 7 more variables: `Scuba diving, trained (per dive)` <dbl>,
#> #   `Driving (230 miles)` <dbl>, Skiing <dbl>, `Flying (8h long-haul)` <dbl>,
#> #   `Chest X-ray (radiation per scan)` <dbl>, `Cup of coffee` <dbl>,
#> #   `Crossing a road` <dbl>