rvest how to get last page number in r language

Question

I\'m learning web scrapping and want to create an example for myself.

https://www.goodreads.com/search?page=1&qid=ckDrIeoJ2c&query=harry+potter&tab=books&