Add Page Count in Word using officer in R

Question

I am trying to add a total page count in a MS Word document that I am generating in R using the officer package. I have tried two approaches for achieving this.