Negates numeric rate difference values while preserving any suffix (e.g., "%"). This is useful when gtsummary::add_difference_row() computes reference - arm but you need arm - reference.

reverse_rate_difference(x)

Arguments

x

(character)
A character vector of rate difference values, possibly with suffixes like "%".

Value

A character vector with negated numeric values.

See also

Usually used together with reverse_ci() for reversing confidence intervals; see examples there for usage with gtsummary::modify_table_body().

Examples

# Basic usage with percentage suffix
reverse_rate_difference(c("5.0%", "-3.2%", "0.0%"))
#> [1] "-5.0%" "3.2%"  "0.0%" 

# Handles NA and empty strings
reverse_rate_difference(c("2.5%", NA, "", "-1.0%"))
#> [1] "-2.5%" NA      NA      "1.0%" 

# Works with values without suffix
reverse_rate_difference(c("10.0", "-5.5"))
#> [1] "-10.0" "5.5"