# NOT RUN {
data(StockPriceReturns)
data(SplitDates)
cmr.result <- constantMeanReturn(firm.returns = StockPriceReturns,
residuals = TRUE)
Comparison <- merge(meanAdjustedReturns = cmr.result$Infosys,
Infosys = StockPriceReturns$Infosys,
all = FALSE)
plot(Comparison)
# }
Run the code above in your browser using DataLab