Add tinkerings in R