| 2 | 2 | #' @param taxable_income Individual's assessable income. |
|
| 3 | 3 | #' @param basic_income_tax_liability Tax liability (in dollars) according to the method in the box in s 4.10(3) of the \emph{Income Tax Assessment Act 1997} (Cth). In general, \code{basic_income_tax_liability} is the ordinary tax minus offsets. In particular, it does not include levies (such as the Medicare levy or the Temporary Budget Repair Levy). |
|
| 4 | 4 | #' \if{latex}{\deqn{\mathrm{Income\;Tax} = \mathrm{Taxable\;income\times\mathrm{Rate}-\mathrm{Tax\;offsets}}}} |
|
| 5 | - | #' For example, in 2015-16, an individual with an assessable income of \$100,000 had a basic tax liability of |
|
| 6 | - | #' approximately \$25,000. |
|
| 5 | + | #' For example, in 2015-16, an individual with an assessable income of 100,000 had a basic tax liability of |
|
| 6 | + | #' approximately 25,000. |
|
| 7 | 7 | #' |
|
| 8 | 8 | #' @param .dots.ATO A \code{data.table} of tax returns. |
|
| 9 | 9 | #' If provided, it must contain the variables |
| 18 | 18 | #' |
|
| 19 | 19 | #' @param aggregated_turnover A numeric vector the same length as \code{taxable_income}. |
|
| 20 | 20 | #' Only used to determine whether or not the offset is applicable; that is, the offset only |
|
| 21 | - | #' applies if aggregated turnover is less than \$2M. |
|
| 21 | + | #' applies if aggregated turnover is less than 2 million. |
|
| 22 | 22 | #' |
|
| 23 | 23 | #' Aggregated turnover of a taxpayer is the sum of the following: |
|
| 24 | 24 | #' \itemize{ |
| 8 | 8 | #' age_pension_age() # Current age of eligiblity |
|
| 9 | 9 | #' age_pension_age("1995-12-31") |
|
| 10 | 10 | #' age_pension_age("2013-14") |
|
| 11 | - | #' @source \url{https://guides.dss.gov.au/guide-social-security-law/3/4/1/10} |
|
| 11 | + | #' @source \url{https://guides.dss.gov.au/social-security-guide/3/4/1/10} |
|
| 12 | 12 | #' @export |
|
| 13 | 13 | ||
| 14 | 14 | age_pension_age <- function(when = Sys.Date(), |
HughParsonage
