bug in `clean_rows()`?

[beanumber]

library(tidyverse)
library(wikitablr)
read_wiki_table("https://en.wikipedia.org/wiki/List_of_largest_cities") %>% 
    clean_rows()
#> Warning in is.data.frame(x): Incompatible methods ("Ops.data.frame",
#> "Ops.factor") for "!="
#> Warning in wiki_table[-1] != wiki_table[[2]]: longer object length is not a
#> multiple of shorter object length
#> Error in wiki_table[-1] != wiki_table[[2]]: comparison of these types is not implemented

^{Created on 2019-12-19 by the reprex package (v0.3.0)}

[beanumber]

Another one?

library(tidyverse)
library(wikitablr)
read_wiki_table("https://en.wikipedia.org/wiki/List_of_metropolitan_areas_by_population")
#> Error in .subset2(x, i, exact = exact): subscript out of bounds

^{Created on 2019-12-19 by the reprex package (v0.3.0)}