# NOT RUN {
IA <- randomsequence()
SEQ <- elo.seq(winner=IA$seqdat$winner, loser=IA$seqdat$loser,
Date=IA$seqdat$Date, draw=IA$seqdat$Draw,
presence=IA$pres)
summary(SEQ)
# }
Run the code above in your browser using DataLab