final.balance:
Calculate Final Balance Based on Initial Balance and Vector of Ratios
Description
Calculated as: initial * prod(ratios)
Usage
final.balance(ratios, initial = 10000)
Arguments
ratios
Numeric vector of ratios between subsequent stock prices (i.e. proportion gains + 1). For example, if a stock gained 3%, lost 1%, then lost 2%, ratios would be c(1.03, 0.99, 0.98).
initial
Initial balance.
Value
Numeric vector indicating final balance.
Details
NA
References
Acknowledgment: This material is based upon work supported by the National Science Foundation Graduate Research Fellowship under Grant No. DGE-0940903.
# Randomly generate daily stock gains over a 5-year periodstockgains <- rnorm(251*5, 1.001, 0.02)
# Calculate final balance if initial balance was $10,000final.balance(stockgains)