L'Ecuyer's Combined multiple-recursive generator in R

Implement L’Ecuyer’s Combined Multiple-Recursive Generator in R and check that the first 100 000 generated random variates are numerically indistinguishable from the ones that R’s implementation produces. How to write this R-code?