dataset <- data.frame(date = as.numeric(time(EuStockMarkets)),
DAX = EuStockMarkets[, "DAX"],
SMI = EuStockMarkets[, "SMI"],
CAC = EuStockMarkets[, "CAC"],
FTSE = EuStockMarkets[, "FTSE"])
edaPlots(dataset, time_column = 'date', output_type = 'timeseries', n_cols = 5)
edaPlots(dataset, time_column = 'date', output_type = 'histogram', n_cols = 5)
Run the code above in your browser using DataLab