chop up official R scripts