Create Examples_samplig.pgls.R

Examples for sampling.pgls function.