Added R Examples