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)A character vector with negated numeric values.
Usually used together with reverse_ci() for reversing confidence intervals; see examples there
for usage with gtsummary::modify_table_body().
# 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"