View source: R/calc_effective_tax_rate.R
calc_effective_tax_rate | R Documentation |
Calculate Effective Tax Rate
calc_effective_tax_rate(portfolio, tax_rate_ltcg, tax_rate_ordinary_income)
portfolio |
A nested |
tax_rate_ltcg |
A numeric. Tax rate for long-term capital gains. |
tax_rate_ordinary_income |
A numeric. Tax rate for ordinary income. |
A portfolio
object augmented with nested columns with
effective tax rates calculations.
portfolio <- create_portfolio_template()
portfolio$accounts$taxable <- c(10000, 30000)
portfolio <-
calc_effective_tax_rate(
portfolio,
tax_rate_ltcg = 0.20,
tax_rate_ordinary_income = 0.40
)
portfolio$aftertax$effective_tax_rate
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.