check offset for numeric value
This commit is contained in:
@@ -16,6 +16,7 @@ download_protocol <- function(path, name) {
|
|||||||
}
|
}
|
||||||
|
|
||||||
fetch_batch <- function(offset) {
|
fetch_batch <- function(offset) {
|
||||||
|
stopifnot("Offset must be numeric" = is.numeric(offset))
|
||||||
mk_url(offset) %>%
|
mk_url(offset) %>%
|
||||||
read_html() %>%
|
read_html() %>%
|
||||||
as.character() %>%
|
as.character() %>%
|
||||||
|
|||||||
Reference in New Issue
Block a user