Create GPmatcomp

First commit of R code. Hoping to get used to commits so that I can more properly track changes and revert back If i brake the function.