working on basics.R