R: trying to upload an implementation