Calculates and adds interest to a savings account based on the current balance and interest rate.
Examples
savings <- SavingsAccount("SAV123", "John Doe", 1000, interest_rate = 0.03)
add_interest(savings)
#> Interest added: $30.00 (3.0%). New balance: $1030.00