n_pags <- esaj::peek_cjsg(query = "", subjects = "14")
#> There are 169 pages to download
#> This should take around 1.4 minutes
n_pags
#> [1] 167
n_pags <- esaj::peek_cjsg(query = "", subjects = "5944")
#> Error in ceiling(.): non-numeric argument to mathematical function
I think it should throw a message and return 0L
Also the result is always numeric. it should be an integer.
Example
I think it should throw a message and return 0L
Also the result is always numeric. it should be an integer.