stat learning - play with r
play with r, accurracy