R:s program , sådantdet