First commit for my rprototypes