Download today’s equity bhavcopy. Just use bhavtoday(). Note that bhavcopy is made available by NSE in the evening.
bhavtoday()
library(nser) report = bhavtoday() head(report)