Some functional R

some notes before i pass out yay glglhfhf