## Not run: ------------------------------------
# b <- bot[1]
# coo_ldk(b, 3) # run this, and click 3 times
# coo_ldk(bot, 2) # this also works on Out
## ---------------------------------------------
Run the code above in your browser using DataLab