Added R notebook