added R workflow script