View source: R/valuation_funs.R
get_beta | R Documentation |
Calculate unlevered and levered beta.
get_beta( average_beta, industry_tax, average_de, firm_tax, firm_debt, firm_equity )
average_beta |
Number Industry average beta |
industry_tax |
Number Industry effective tax rate |
average_de |
Number Industry average Debt/Equity |
firm_tax |
Number Firm effective tax |
firm_debt |
Number Firm debt value (short + long term) |
firm_equity |
Number Firm equity value |
Tibble with bottom-up beta
# beta <- get_beta(average_beta=0.77, industry_tax=0.05, average_de=0.083, firm_tax=0.35, firm_debt=333, firm_equity=444)
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.