library(dplyr)
library(ReinforcementLearning)
library(magrittr)
library(lazytrade)
data(data_trades)
states <- c("tradewin", "tradeloss")
actions <- c("ON", "OFF")
control <- list(alpha = 0.7, gamma = 0.3, epsilon = 0.1)
rl_generate_policy(x = data_trades,
states, actions, control)
Run the code above in your browser using DataLab