draft.R

## reference
download.file('http://citeseerx.ist.psu.edu/viewdoc/download?doi=10.1.1.534.6027&rep=rep1&type=pdf', 
              destfile = './A Monte Carlo Analysis of Hypothetical Multi-Line Slot Machine Play.pdf')
download.file('https://web.stanford.edu/group/SITE/archive/SITE_2011/2011_segment_8/2011_segment_8_papers/lien.pdf',
              destfile = './Slot Machine Stopping Decisions - Evidence for Prospect Theory Preferences.pdf')


## game link
lnk <- 'http://www.slotsup.com/free-slots-online/golden-tour-playtech'

'https://github.com/topics/monte-carlo-simulation?o=desc&s=forks'
'https://github.com/100/Stock-Analysis-Markov'
'https://github.com/TodorBalabanov/SlotMachineBaseGameEvolutionaryOptimization'
'http://100.github.io/Stock-Analysis-Markov/'