Create learn.R

The executable guide