# NOT RUN {
library(readr)
library(dplyr)
library(lubridate)
library(magrittr)
path_terminal <- system.file("extdata", package = "lazytrade")
# load and prepare prices data
prices <- load_asset_data(path_terminal = path_terminal,
trade_log_file = "AI_CP",
time_period = 60,
data_deepth = "300")
# load and prepare indicator data
macd <- load_asset_data(path_terminal = path_terminal,
trade_log_file = "AI_Macd",
time_period = 60,
data_deepth = "300")
# }
Run the code above in your browser using DataLab