fix source R using devtools