Replace all examples using data factorDataSetDjia5Yrs with CRSP/SPGMI data

[JustinMShea]

Using the selectCRSPandSPGMI function with stocksCRSP and factorsSPGMI, create a similar dataset to factorsDataSetDjia5Yrs and replace in all examples. When done, move the legacy data set to the sandbox. Related to #25

*Running `grep -rnw factorDataSetDjia5Yrs R/.R` in the linux terminal gives me:**

R/assetDecomp.R:30:#'data("factorDataSetDjia5Yrs") R/assetDecomp.R:35:#'fit <- fitFfm(data=factorDataSetDjia5Yrs, asset.var="TICKER", ret.var="RETURN", R/exposuresTseries.R:22:#' data("factorDataSetDjia5Yrs") R/exposuresTseries.R:26:#'exposuresTseries(factorDataSetDjia5Yrs,tickers = tickers,which.exposures = "MKTCAP") R/exposuresTseries.R:30:#'exposuresTseries(factorDataSetDjia5Yrs,tickers = tickers,plot.returns = FALSE) R/exposuresTseries.R:33:#'exposuresTseries(factorDataSetDjia5Yrs,tickers = tickers,plot.returns = TRUE, axis.cex = 0.8, R/factorDataSetDjia5Yrs.R:1:#' factorDataSetDjia5Yrs R/factorDataSetDjia5Yrs.R:14:#' @usage data('factorDataSetDjia5Yrs') R/factorDataSetDjia5Yrs.R:38:#' data(factorDataSetDjia5Yrs) R/factorDataSetDjia5Yrs.R:39:#' str(factorDataSetDjia5Yrs) R/factorDataSetDjia5Yrs.R:40:"factorDataSetDjia5Yrs" R/fitFfm.R:180:#' data("factorDataSetDjia5Yrs") R/fitFfm.R:184:#' fit <- fitFfm(data=factorDataSetDjia5Yrs, asset.var="TICKER", ret.var="RETURN", R/fitFfm.R:190:#' fit1 <- fitFfm(data=factorDataSetDjia5Yrs, asset.var="TICKER", ret.var="RETURN", R/fitFfm.R:196:#' factorDataSetDjia5Yrs$COUNTRY = rep(rep(c(rep("US", 1 ),rep("GERMANY", 1 )), 11), 60) R/fitFfm.R:199:#' # fit.MICM <- fitFfm(data=factorDataSetDjia5Yrs, asset.var="TICKER", ret.var="RETURN", R/fmmcSemiParam.R:102:#' data("factorDataSetDjia5Yrs") R/fmmcSemiParam.R:104:#' fit.ffm <- fitFfm(data = factorDataSetDjia5Yrs, R/fmRsq.R:34:#' data("factorDataSetDjia5Yrs") R/fmRsq.R:38:#' fit <- fitFfm(data = factorDataSetDjia5Yrs, R/fmRsq.R:47:#' fit1 <- fitFfm(data=factorDataSetDjia5Yrs, asset.var="TICKER", ret.var="RETURN", R/fmTstats.R:55:#' data("factorDataSetDjia5Yrs") R/fmTstats.R:58:#' fit <- fitFfm(data = factorDataSetDjia5Yrs, R/fmTstats.R:70:#' fit1 <- fitFfm(data = factorDataSetDjia5Yrs, asset.var = "TICKER", R/fmTstats.R:82:#' # factorDataSetDjia5Yrs$COUNTRY = rep(rep(c(rep("US", 1 ), rep("GERMANY", 1 )), 11), 60) R/fmTstats.R:84:#' # fit.MICM <- fitFfm(data = factorDataSetDjia5Yrs, R/plot.ffm.R:112:#' data("factorDataSetDjia5Yrs") R/plot.ffm.R:116:#' fit.style.sector <- fitFfm(data=factorDataSetDjia5Yrs, asset.var="TICKER", R/predict.ffm.R:36:#' data("factorDataSetDjia5Yrs") R/predict.ffm.R:39:#' fit <- fitFfm(data = factorDataSetDjia5Yrs, R/predict.ffm.R:46:#' newdata <- as.data.frame(unique(factorDataSetDjia5Yrs$TICKER)) R/print.ffm.R:21:#' data("factorDataSetDjia5Yrs") R/print.ffm.R:23:#' fit.style.sector <- fitFfm(data=factorDataSetDjia5Yrs, R/summary.ffm.R:38:#' data("factorDataSetDjia5Yrs") R/summary.ffm.R:41:#' fit <- fitFfm(data = factorDataSetDjia5Yrs, R/VIF.R:32:#' data("factorDataSetDjia5Yrs") R/VIF.R:36:#' fit <- fitFfm(data=factorDataSetDjia5Yrs, asset.var="TICKER", ret.var="RETURN", R/wtsDjiaGmvLo.R:5:#' @description Contains weights obtained after optimizing the portfolio returns of the 30 DJIA stocks (from dataset \link{factorDataSetDjia5Yrs})