modified R markdown