From b8c948c46fe0e3990c4f6a43eb47af24579cd37b Mon Sep 17 00:00:00 2001
From: Scott Chamberlain <myrmecocystus@gmail.com>
Date: Mon, 28 Sep 2020 16:28:17 -0700
Subject: [PATCH] fix #847 add epifamily rank to rank_ref_zoo dataset, bump
 version

---
 DESCRIPTION                   |   2 +-
 R/worms_downstream.R          |   2 +-
 data/rank_ref_zoo.RData       | Bin 586 -> 593 bytes
 inst/ignore/rank_ref_script.R |   4 ++--
 4 files changed, 4 insertions(+), 4 deletions(-)

diff --git a/DESCRIPTION b/DESCRIPTION
index ab91f6dd..6c783a8f 100644
--- a/DESCRIPTION
+++ b/DESCRIPTION
@@ -5,7 +5,7 @@ Description: Interacts with a suite of web 'APIs' for taxonomic tasks,
     species names, getting taxonomic hierarchies, fetching downstream and
     upstream taxonomic names, getting taxonomic synonyms, converting
     scientific to common names and vice versa, and more.
-Version: 0.9.98.91
+Version: 0.9.98.92
 License: MIT + file LICENSE
 URL: https://docs.ropensci.org/taxize/ (website),
     https://github.com/ropensci/taxize (devel),
diff --git a/R/worms_downstream.R b/R/worms_downstream.R
index b438dc22..2f8a22e1 100644
--- a/R/worms_downstream.R
+++ b/R/worms_downstream.R
@@ -50,7 +50,7 @@ worms_downstream <- function(id, downto, intermediate = FALSE, start = 1,
   while (stop_ == "not") {
     iter <- iter + 1
     tt <- dt2df(lapply(id, function(x)
-      worms_children(x, start = start, ...)), idcol = FALSE)
+      worms_children(x, start = start)), idcol = FALSE)
     tt <- prune_too_low(tt, downto, zoo = TRUE)
 
     if (NROW(tt) == 0) {
diff --git a/data/rank_ref_zoo.RData b/data/rank_ref_zoo.RData
index ce201c5359ae5436fa9476c68e817d060b69490e..0c3df806c6cd1224392081808395ff996a4afd77 100644
GIT binary patch
literal 593
zcmV-X0<QfZiwFP!0000016@>2kJ>O0O~Wo*(ykV%tyJ}ddbYL@2+&h6{RKVkZDoi7
zYe^j04i$UqU+f<$9mlc9=8*W!o3H1wlV3ld^6V)~k|a%T;7JDnZ&G-@0eb}Ndr9k;
zXUTTYuR<ir;6oRiBx88K^)cym=279$Z0b;s$b09WTOjh@!gEWHRvxVp`M&Giqq#>5
zk9_6z(xa6_-(9`IY>IG(Fb`mXaEWl`;T&V<7`s5W2p|S5kzFBNBSew;tU%}+=O{8q
zkvYoAQA1t?5Mxn8zC;!^%wan5!4FGOQC_>NqS}VZ7hdmy?zy|z%v8IHna{l5N!oLy
ztI!<I$JY5DtVK$G;))B`>k|~}J%Fy9_g&2^GV5w@k5s9ixeblCP$smqu13hbg9sg0
z7&TO$qO6MT=~f(s)R<-3hSV^!My7F;VLOME)h=Yoq|+W6Mtf*m?IF_%4T(F&wmKTl
zCT6Ve9j*BB?2534N5n98Lyd^As<q@B=2VA<Q5`w=tZu{O2<?xmVO!4BWG_YA5XB@I
zy>IM%Cdat_9xd;#XE&9Y`(pNO8L|_yqLa>|NA8QCD74aNVpr<;2gr0TI4!>krMYwh
z#-^mLODX~P+6#k80o$8DHeBd)!w6U6NHrr3)d%4>8lWypX$jvPp&KS84NmN9TX*7j
zoRy>&6Z7LHZEY4H;Fgx`>fe4_(+Wmmzv<K+s!8Cb3o(|u&a+qE<~cGesiu!G;p)20
fNQ&Q&uGPJ1^#@*;%jGXD|IG6rbnhLMhXw!uATcI6

literal 586
zcmV-Q0=4}giwFP!0000016@>2kJ>O0O<_Mu+SMYpm8zal&lUo+0eb4Czo4hRtqd_>
zEr}!Bp`xe$#{QtvaU6SW4vF7;<C%H>NPhl!rulQ8W!WIRfoCuTcr$?48{i`t-z!$X
zz9_zX`7LFZ4L@{qvuq5{w4XDW%>ybtn$J9<h(dG`v?oL%S_Eww&?=xcqR@9u16l<1
z6i}$VUIw)C=$o%MoX-%>5z+`22$u*~0WNUv6T%{bSYe6k3gH?dI-~OfVdzHD8AWFl
zJy7&OiwNRe^gx%WqK5@+NqX9MrL35!{r%8w!_}*(_aOJ$eM)oPZc^p5sCSC>8tE!D
zhx4)Z@khr<DNaHQ>3e;GLVX0#Rq&y!c_rpu?d_3i-7B{-c?)G?o_953<sHm0X@yb4
z)G5iT_?~U$K`Mh;wrwokC2V9HCmF7DEIIE|m0Wr6F|pob?!3oJXEYY>HQ$<Kb2h2s
zeD7E#j%V*XVb*sdIFm++4fiHvVofH&J+Iq%_hbH1H+(C&p6r!u8=|=a(#OU=W^-&f
zEXnEqHg=nkYG3R!okDg}Rcz8Rb`+ubi9suKCT?V2e}qgQg2M@m&_*b4U~Egex}=hD
zje{}RDNuX*eIukfH=GD9kIZn=FmsS$p%Ln4X`|p1BW%N!V$lJ8ZR^hbPVkb{a$<kZ
zq^<1$0$j?HU;V#tYgWNlxKDWC57j1!(oeBWU+1|S?()2tm&~v!>~MA6W~Ah=sc-dQ
YTm6C8<#PE8!$14{2PN)M=xYW50BT<zRR910

diff --git a/inst/ignore/rank_ref_script.R b/inst/ignore/rank_ref_script.R
index 2a7505b4..d476746e 100644
--- a/inst/ignore/rank_ref_script.R
+++ b/inst/ignore/rank_ref_script.R
@@ -48,7 +48,7 @@ ids_zoo <- c(
   '83','84','85','86','87', # cohort
   '90','100','110','120','125', # order
   '126','127', # section/subsection
-  '130','140','150', # family
+  '130','135','140','150', # family
   '155','160','170', # tribe
   '180','190','215','217', # genus
   '220','225','230', # species/etc.
@@ -64,7 +64,7 @@ ranks_zoo <- c(
   'megacohort','supercohort','cohort','subcohort','infracohort', # cohort
   'superorder','order','suborder','infraorder','parvorder', # order
   'section','subsection', # section/subsection
-  'superfamily','family','subfamily', # family
+  'superfamily','epifamily','family','subfamily', # family
   'supertribe','tribe','subtribe', # tribe
   'genus','subgenus','species group,series','species subgroup', # genus
   'species','infraspecies','subspecies,forma specialis', # species/etc.