Implementation in R#