Running examples in 'hypothesisr-Ex.R' failed
The error most likely occurred in:

> ### Name: hs_search
> ### Title: Search hypothes.is annotations
> ### Aliases: hs_search
> 
> ### ** Examples
> 
> # Search for no more than 5 annotations containing the text "ulysses"
> hs_search(text = "ulysses", limit = 5)
No encoding supplied: defaulting to UTF-8.
Warning: `as_data_frame()` is deprecated as of tibble 2.0.0.
Please use `as_tibble()` instead.
The signature and semantics have changed, see `?as_tibble`.
This warning is displayed once every 8 hours.
Call `lifecycle::last_warnings()` to see where this warning was generated.
Your search result returned 5 annotations, however 39 are available. Use hs_search_all to page through all possible results.
# A tibble: 5 x 21
  id    created updated user  uri   text  tags  group target flagged hidden
  <chr> <chr>   <chr>   <chr> <chr> <chr> <lis> <chr> <list> <lgl>   <lgl> 
1 AVGC~ 2015-1~ 2015-1~ acct~ http~ "Pop~ <chr~ __wo~ <df[,~ FALSE   FALSE 
2 AVLD~ 2016-0~ 2016-0~ acct~ http~ "Rem~ <chr~ __wo~ <df[,~ FALSE   FALSE 
3 AVOb~ 2016-0~ 2016-0~ acct~ http~ "I w~ <chr~ __wo~ <df[,~ FALSE   FALSE 
4 AVOk~ 2016-0~ 2016-0~ acct~ http~ "Usi~ <chr~ __wo~ <df[,~ FALSE   FALSE 
5 AVPX~ 2016-0~ 2016-0~ acct~ http~ "And~ <chr~ __wo~ <df[,~ FALSE   FALSE 
# ... with 10 more variables: references <list>, permissions.read <list>,
#   permissions.admin <list>, permissions.update <list>,
#   permissions.delete <list>, document.title <list>, links.html <chr>,
#   links.incontext <chr>, links.json <chr>, user_info.display_name <lgl>
> # Search with a custom field for tags
> hs_search(custom = list(tags = "todo"))
No encoding supplied: defaulting to UTF-8.
Your search result returned 20 annotations, however 98 are available. Use hs_search_all to page through all possible results.
# A tibble: 20 x 21
   consumer id    created updated user  uri   text  tags  group target flagged
   <chr>    <chr> <chr>   <chr>   <chr> <chr> <chr> <lis> <chr> <list> <lgl>  
 1 0000000~ GPGO~ 2013-1~ 2013-1~ acct~ http~ "Il ~ <chr~ __wo~ <df[,~ FALSE  
 2 0000000~ 0KSl~ 2014-0~ 2014-0~ acct~ http~ "wtf~ <chr~ __wo~ <df[,~ FALSE  
 3 0000000~ D4GJ~ 2014-0~ 2014-0~ acct~ http~ "tod~ <chr~ __wo~ <df[,~ FALSE  
 4 0000000~ NjbW~ 2014-0~ 2014-0~ acct~ http~ "Fin~ <chr~ __wo~ <df[,~ FALSE  
 5 0000000~ azrY~ 2014-1~ 2014-1~ acct~ http~ "We ~ <chr~ __wo~ <df[,~ FALSE  
 6 0000000~ Txqd~ 2015-0~ 2015-0~ acct~ urn:~ ""    <chr~ __wo~ <df[,~ FALSE  
 7 0000000~ Ex_3~ 2015-0~ 2015-0~ acct~ http~ "Kee~ <chr~ __wo~ <df[,~ FALSE  
 8 <NA>     PkQI~ 2016-0~ 2016-0~ acct~ http~ ""    <chr~ __wo~ <df[,~ FALSE  
 9 <NA>     yckW~ 2016-0~ 2016-0~ acct~ http~ "Whe~ <chr~ __wo~ <df[,~ FALSE  
10 <NA>     DFBX~ 2016-1~ 2016-1~ acct~ http~ "Sys~ <chr~ __wo~ <df[,~ FALSE  
11 <NA>     NDz9~ 2016-1~ 2016-1~ acct~ http~ "One~ <chr~ __wo~ <df[,~ FALSE  
12 <NA>     ZOtr~ 2016-1~ 2016-1~ acct~ http~ "A q~ <chr~ __wo~ <df[,~ FALSE  
13 <NA>     hvru~ 2016-1~ 2016-1~ acct~ http~ "How~ <chr~ __wo~ <df[,~ FALSE  
14 <NA>     wvLv~ 2016-1~ 2016-1~ acct~ http~ "usi~ <chr~ __wo~ <df[,~ FALSE  
15 <NA>     BYWN~ 2016-1~ 2016-1~ acct~ http~ "How~ <chr~ __wo~ <df[,~ FALSE  
16 <NA>     LL9L~ 2016-1~ 2016-1~ acct~ http~ "on ~ <chr~ __wo~ <df[,~ FALSE  
17 <NA>     SRqU~ 2016-1~ 2016-1~ acct~ http~ "a r~ <chr~ __wo~ <df[,~ FALSE  
18 <NA>     pFpn~ 2016-1~ 2016-1~ acct~ http~ "rev~ <chr~ __wo~ <df[,~ FALSE  
19 <NA>     -uTK~ 2017-0~ 2017-0~ acct~ http~ ""    <chr~ __wo~ <df[,~ FALSE  
20 <NA>     bVXL~ 2017-0~ 2017-0~ acct~ http~ "Try~ <chr~ __wo~ <df[,~ FALSE  
# ... with 10 more variables: hidden <lgl>, permissions.read <list>,
#   permissions.admin <list>, permissions.update <list>,
#   permissions.delete <list>, document.title <list>, links.html <chr>,
#   links.incontext <chr>, links.json <chr>, user_info.display_name <chr>
> # use the 'uri.parts' field to find annotations on a given domain (exclude
> # the TLD, as this will result in all annotations on sites with, e.g., .org,
> # as well.)
> hs_search(custom = list(uri.parts = "programminghistorian"))
Error: lexical error: invalid char in json text.
                                       <!DOCTYPE html> <!--[if lt IE 7
                     (right here) ------^
Execution halted