using R now