Calculate the percent change between two values or vectors of values

pct_change(start, final, perc = FALSE)

Arguments

start	A value or vector of values
final	A value or vector of values
perc	A logical indicating whether or not to format the value with a percent symbol

Examples

tibble::tibble(
 start = seq(0.1, 1.1, 0.1),
 final = sample(seq(0.1, 1, 0.1), 11, replace = TRUE)
 ) %>%
dplyr::mutate(pct_diff = pct_change(start, final))
#> # A tibble: 11 x 3
#>    start final pct_diff
#>    <dbl> <dbl>    <dbl>
#>  1   0.1   0.5    4    
#>  2   0.2   0.5    1.50 
#>  3   0.3   0.8    1.67 
#>  4   0.4   0.2   -0.5  
#>  5   0.5   0.7    0.4  
#>  6   0.6   0.5   -0.167
#>  7   0.7   0.5   -0.286
#>  8   0.8   0.2   -0.75 
#>  9   0.9   0.6   -0.333
#> 10   1     0.4   -0.6  
#> 11   1.1   0.2   -0.818