# takes > 5s
source(system.file("examples/fisheries-ex.R", package = "sarsop"))
log = tempfile()
alpha <- sarsop(transition, observation, reward, discount, precision = 10,
log_dir = log)
Run the code above in your browser using DataLab