website works with r code