data(portfolio_bacon)
print(SystematicRisk(portfolio_bacon[,1], portfolio_bacon[,2])) #expected 0.013
data(managers)
print(SystematicRisk(managers['2002',1], managers['2002',8]))
print(SystematicRisk(managers['2002',1:5], managers['2002',8]))
Run the code above in your browser using DataLab