# NOT RUN {
RL_Start <- RL_Initialize(
ParameterGridSet = GridClusters,
Alpha = Alpha,
Beta = Beta,
SubDivisions = 1000L)
BanditArmsN <- RL_Start[["BanditArmsN"]]
Successes <- RL_Start[["Successes"]]
Trials <- RL_Start[["Trials"]]
GridIDs <- RL_Start[["GridIDs"]]
BanditProbs <- RL_Start[["BanditProbs"]]
# }
Run the code above in your browser using DataLab