# NOT RUN {
library(lazytrade)
library(dplyr)
library(readr)
library(lubridate)
DFT1 <- import_data(trade_log_file = system.file("extdata",
"OrdersResultsT1.csv",
package = "lazytrade"),
demo_mode = TRUE)
# without writing to the file
DFT1 %>% check_if_optimize(num_trades_to_consider = 10,
profit_factor_limit = 1.2,
demo_mode = TRUE,
write_mode = FALSE)
# function will write to the temporary file
DFT1 %>% check_if_optimize(num_trades_to_consider = 10,
profit_factor_limit = 1.2,
demo_mode = TRUE,
write_mode = TRUE)
# }
Run the code above in your browser using DataLab