ggppagan : r erronor