# NOT RUN {
data(OtherReturns)
formattedClusters <- get.clusters.formatted(event.series = OtherReturns[, "SP500"],
response.series = OtherReturns[, "NiftyIndex"])
ees.summary.tables <- eesSummary(formattedClusters)
str(ees.summary.tables, max.level = 2)
# }
Run the code above in your browser using DataLab