# Create vector of daily gains for a hypothetical stock
daily.gains <- c(-0.02, -0.01, 0.01, 0.02, 0.01)
# Overall growth is 0.95%
gains.rate(daily.gains)
# Average daily growth is 0.19%
gains.rate(daily.gains, 1)
# Corresponds to 60.7% annual growth
gains.rate(daily.gains, 251)
Run the code above in your browser using DataLab