data-raw/equations_XaCh2016.R
In SCAR/solong: Allometric Equations for Southern Ocean Taxa
refs <- c(refs,list(
XC=bibentry(bibtype="Book",key="XC",year=2009,
title="Cephalopod beak guide for the Southern Ocean",
author=c(person("J","Xavier"),person("Y","Cherel")),publisher="British Antarctic Survey",
address="Cambridge",pages=129),
Clar1986=bibentry(bibtype="Misc",key="Clar1986",
author=person(c("M","R"),"Clarke"),
year=1986,title="A handbook for the identification of cephalopod beaks. Clarendon Press, Oxford",
howpublished="As cited in Xavier J & Cherel Y (2009 updated 2016) Cephalopod beak guide for the Southern Ocean. Cambridge, British Antarctic Survey, 129pp."),
Roel2000=bibentry(bibtype="Article",key="Roel2000",
author=person(c("M","A","C"),"Roeleveld"),year=2000,
title="Giant squid beaks: implications for systematics",
journal="Journal of the Marine Biological Association of the UK",
volume=80,pages="185-187"),
LuWi1994=bibentry(bibtype="Article",key="LuWi1994",
author=c(person(c("C","C"),"Lu"),person("R","Williams")),
year=1994,
title="Contribution to the biology of squid in the Prydz Bay region, Antarctica",
journal="Antarctic Science",volume=6,pages="223-229",doi="10.1017/S0954102094000349"),
Rodh1990=bibentry(bibtype="Article",key="Rodh1990",
author=c(person(c("P","G"),"Rodhouse"),person(c("P","A"),"Prince"),person(c("M","R"),"Clarke"),person(c("A","W","A"),"Murray")),
year=1990,title="Cephalopod prey of the grey-headed albatross Diomedea chrysostoma",
journal="Marine Biology",volume=104,pages="353-362",doi="10.1007/BF01314337",
note="As cited in Xavier J & Cherel Y (2009 updated 2016) Cephalopod beak guide for the Southern Ocean. Cambridge, British Antarctic Survey, 129pp."),
Clar1962b=bibentry(bibtype="Article",key="Clar1962b",
author=c(person(c("M"),"Clarke")),
year=1962,title="The identification of cephalopod \"beaks\" and the relationship between beak size and total body weight",
journal="Bulletin of the British Museum of Natural History B",
volume=8,pages="421-480",
note="As cited in Xavier J & Cherel Y (2009 updated 2016) Cephalopod beak guide for the Southern Ocean. Cambridge, British Antarctic Survey, 129pp."),
LuIc2002=bibentry(bibtype="Article",key="LuIc2002",
author=c(person(c("C","C"),"Lu"),person("R","Ickeringill")),
year=2002,
title="Cephalopod beak identification and biomass estimation techniques: tools for dietary studies of southern Australian finfishes",
journal="Museum Victoria Science Reports",
volume=6,pages="1-65"),
BASUnpub=bibentry(bibtype="Unpublished",key="BASUnpub",
author=person(family="BAS"),
title="Unpublished data",
note="As cited in Xavier J & Cherel Y (2009 updated 2016) Cephalopod beak guide for the Southern Ocean. Cambridge, British Antarctic Survey, 129pp."),
Piat2001=bibentry(bibtype="Article",key="Piat2001",
author=c(person("U","Piatkowski"),person("K","P\uFCtz"),person("H","Heinemann")),
year=2001,
title="Cephalopod prey of king penguins (Aptenodytes patagonicus) breeding at Volunteer Beach, Falkland Islands, during austral winter 1996",
journal="Fisheries Research",volume=52,pages="79-90",
doi="10.1016/S0165-7836(01)00232-6"),
HatfPersComm=bibentry(bibtype="Misc",key="HatfPersComm",
author=person("Hatfield"),
year="2001",
howpublished="Pers. comm., as cited in Piatkowski U, P\uFCtz K, Heinemann H (2001) Cephalopod prey of king penguins (Aptenodytes patagonicus) breeding at Volunteer Beach, Falkland Islands, during austral winter 1996. Fisheries Research 52:79-90. doi:10.1016/S0165-7836(01)00232-6"),
RoYe1990=bibentry(bibtype="Article",key="RoYe1990",
author=c(person(c("P","G"),"Rodhouse"),person(c("J"),"Yeatman")),
year=1990,title="Redescription of Martialia hyadesi Rochbrune and Mabille, 1889 (Mollusca: Cephalopoda) from the Southern Ocean",
journal="Bulletin of the British Museum of Natural History (Zoology)",
volume=56,pages="135-143",
note="As cited in Xavier J & Cherel Y (2009 updated 2016) Cephalopod beak guide for the Southern Ocean. Cambridge, British Antarctic Survey, 129pp."),
SaHa2000=bibentry(bibtype="Article",key="SaHa2000",
author=c(person(c("R","A"),"Santos"),person(c("M"),"Haimovici")),
year=2000,title="The Argentine short-finned squid Illex argentinus in the food webs of southern Brazil",
journal="Sarsia",
volume=85,pages="49-60",doi="10.1080/00364827.2000.10414554"),
BrKl1987=bibentry(bibtype="Article",key="",
author=c(person(c("C","R"),"Brown"),person(c("N","T"),"Klages")),
year=1987,
title="Seasonal and annual variation in diets of macaroni (Eudyptes chrysolophus chrysolophus) and southern rockhopper (E. chrysocome chrysocome) penguins at sub-Antarctic Marion Island",
journal="Journal of Zoology, London",
volume=212,pages="7-28",doi="10.1111/j.1469-7998.1987.tb05111.x",
note="As cited in Xavier J & Cherel Y (2009 updated 2016) Cephalopod beak guide for the Southern Ocean. Cambridge, British Antarctic Survey, 129pp."),
Jack1995=bibentry(bibtype="Article",key="Jack1995",
author=c(person(c("G","D"),"Jackson")),
year=1995,title="The use of beaks as tools for biomass estimation in the deepwater squid Moroteuthis ingens (Cephalopoda: Onychoteuthidae) in New Zealand waters",
journal="Polar Biology",
volume=15,pages="9-14",doi="10.1007/BF00236118",
note="As cited in Xavier J & Cherel Y (2009 updated 2016) Cephalopod beak guide for the Southern Ocean. Cambridge, British Antarctic Survey, 129pp."),
CherUnpub=bibentry(bibtype="Unpublished",key="CherUnpub",
author=person("Y","Cherel"),
title="Unpublished data",
note="As cited in Xavier J & Cherel Y (2009 updated 2016) Cephalopod beak guide for the Southern Ocean. Cambridge, British Antarctic Survey, 129pp."),
Grog2000=bibentry(bibtype="Article",key="Grog2000",
author=c(person("J","Gr\uF6ger"),person("U","Piatkowski"),person("H","Heinemann")),
year=2000,
title="Beak length analysis of the Southern Ocean squid Psychroteuthis glacialis (Cephalopoda: Psychroteuthidae) and its use for size and biomass estimation",
journal="Polar Biology",volume=23,
pages="70-74",doi="10.1007/s003000050009"),
CollUnpub=bibentry(bibtype="Unpublished",key="CollUnpub",
author=person(family="Collins"),
title="Unpublished data",
note="As cited in Xavier J & Cherel Y (2009 updated 2016) Cephalopod beak guide for the Southern Ocean. Cambridge, British Antarctic Survey, 129pp.")))
##oldrefs <- c(oldrefs,list(
## XC="Xavier J & Cherel Y (2009 updated 2016) Cephalopod beak guide for the Southern Ocean. Cambridge, British Antarctic Survey, 129pp.",
## Clar1986="Clarke (1986) in Xavier J & Cherel Y (2009 updated 2016) Cephalopod beak guide for the Southern Ocean. Cambridge, British Antarctic Survey, 129pp.",##"Clarke MR (1986) A handbook for the identification of cephalopod beaks. Clarendon Press, Oxford",
## Roel2000="Roeleveld (2000) in Xavier J & Cherel Y (2009 updated 2016) Cephalopod beak guide for the Southern Ocean. Cambridge, British Antarctic Survey, 129pp.", ##Roeleveld MAC (2000) Giant squid beaks: implications for systematics. Journal of the Marine Biological Association of the UK 80: 185-187
## LuWi1994="Lu CC, Williams R (1994) Contribution to the biology of squid in the Prydz Bay region, Antarctica. Antarctic Science 6: 223-229",
## Rodh1990="Rodhouse et al. (1990) in Xavier J & Cherel Y (2009 updated 2016) Cephalopod beak guide for the Southern Ocean. Cambridge, British Antarctic Survey, 129pp.", ##Rodhouse PG, Prince PA, Clarke MR, Murray AWA (1990) Cephalopod prey of the grey-headed albatross Diomedea chrysostoma. Marine Biology 104: 353-362
## Clar1962b="Clarke (1962b) in Xavier J & Cherel Y (2009 updated 2016) Cephalopod beak guide for the Southern Ocean. Cambridge, British Antarctic Survey, 129pp.", ##Clarke M (1962b) The identification of cephalopod "beaks" and the relationship between beak size and total body weight. Bulletin of the British Museum of Natural History B 8(10), 421-480
## LuIc2002="Lu CC & Ickeringill R (2002) Cephalopod beak identification and biomass estimation techniques: tools for dietary studies of southern Australian finfishes. Museum Victoria Science Reports 6:1-65",
## BASUnpub="BAS (unpublished data) in Xavier J & Cherel Y (2009 updated 2016) Cephalopod beak guide for the Southern Ocean. Cambridge, British Antarctic Survey, 129pp.",
## Piat2001="Piatkowski U, P\uFCtz K, Heinemann H (2001) Cephalopod prey of king penguins (Aptenodytes patagonicus) breeding at Volunteer Beach, Falkland Islands, during austral winter 1996. Fisheries Research 52:79-90. doi:10.1016/S0165-7836(01)00232-6",
## RoYe1990="Rodhouse & Yeatman (1990) in Xavier J & Cherel Y (2009 updated 2016) Cephalopod beak guide for the Southern Ocean. Cambridge, British Antarctic Survey, 129pp.", ##Rodhouse PG, Yeatman J (1990) Redescription of Martialia hyadesi Rochbrune and Mabille, 1889 (Mollusca: Cephalopoda) from the Southern Ocean. Bulletin of the British Museum of Natural History (Zoology) 56: 135-143
## SaHa2000="Santos RA, Haimovici M (2000) The Argentine short-finned squid Illex argentinus in the food webs of southern Brazil. Sarsia 85: 49-60",
## BrKl1987="Brown & Klages (1987) in Xavier J & Cherel Y (2009 updated 2016) Cephalopod beak guide for the Southern Ocean. Cambridge, British Antarctic Survey, 129pp.", ##Brown CR, Klages NT (1987) Seasonal and annual variation in diets of macaroni (Eudyptes chrysolophus chrysolophus) and southern rockhopper (E. chrysocome chrysocome) penguins at sub-Antarctic Marion Island. Journal of Zoology, London 212: 7-28
## Jack1995="Jackson (1995) in Xavier J & Cherel Y (2009 updated 2016) Cephalopod beak guide for the Southern Ocean. Cambridge, British Antarctic Survey, 129pp.", ##Jackson GD (1995) The use of beaks as tools for biomass estimation in the deepwater squid Moroteuthis ingens (Cephalopoda: Onychoteuthidae) in New Zealand waters. Polar Biology 15: 9-14
## CherUnpub="Cherel (unpublished data) in Xavier J & Cherel Y (2009 updated 2016) Cephalopod beak guide for the Southern Ocean. Cambridge, British Antarctic Survey, 129pp.",
## Grog2000="Gr\uF6ger J, Piatkowski U, Heinemann H (2000) Beak length analysis of the Southern Ocean squid Psychroteuthis glacialis (Cephalopoda: Psychroteuthidae) and its use for size and biomass estimation. Polar Biology 23:70-74. doi:10.1007/s003000050009",
## CollUnpub="Collins (unpublished data) in Xavier J & Cherel Y (2009 updated 2016) Cephalopod beak guide for the Southern Ocean. Cambridge, British Antarctic Survey, 129pp."))
alleq_XaCh2016 <- function(id) {
switch(id,
## Ancistrocheirus lesueurii
## ML=-41.3+40.75LRL ; ln M=-0.194+3.56ln LRL (n=23 for ML, n=21 for M) (Clarke 1986)
"138747_ML_Clar1986"=list(taxon_name="Ancistrocheirus lesueurii",
taxon_aphia_id=138747,
equation=function(...)tibble(allometric_value=-41.3+40.75*...),
inputs=tibble(property="lower rostral length",
units="mm"),
return_property="mantle length",
return_units="mm",
reliability=tibble(type="N",value=23),
reference=refs$Clar1986),
"138747_WW_Clar1986"=list(taxon_name="Ancistrocheirus lesueurii",
taxon_aphia_id=138747,
equation=function(...)tibble(allometric_value=exp(-0.194+3.56*log(...))),
inputs=tibble(property="lower rostral length",
units="mm"),
return_property="wet weight",
return_units="g",
reliability=tibble(type="N",value=21),
reference=refs$Clar1986),
## Architeuthis dux
## ML=-55.6+59.31LRL ; ln M=-1.773+4.57ln LRL (n=11 for ML; n=9 for M) (Clarke 1986)
## For relationships between ML and LRL, ML=10((LRL/11.2)+1.723214286) (n=43) might be
## better (Roeleveld 2000) with ML= mantle length (in mm), M= mass (in g) and LRL=
## lower rostral length (in mm).
"342218_ML_Clar1986"=list(taxon_name="Architeuthis dux",
taxon_aphia_id=342218,
equation=function(...)tibble(allometric_value=-55.6+59.31*...),
inputs=tibble(property="lower rostral length",
units="mm"),
return_property="mantle length",
return_units="mm",
reliability=tibble(type="N",value=11),
reference=refs$Clar1986),
"342218_WW_Clar1986"=list(taxon_name="Architeuthis dux",
taxon_aphia_id=342218,
equation=function(...)tibble(allometric_value=exp(-1.773+4.57*log(...))),
inputs=tibble(property="lower rostral length",
units="mm"),
return_property="wet weight",
return_units="g",
reliability=tibble(type="N",value=9),
reference=refs$Clar1986),
"342218_ML_Roel2000"=list(taxon_name="Architeuthis dux",
taxon_aphia_id=342218,
equation=function(...)tibble(allometric_value=10^((.../11.2)+1.723214286)),
inputs=tibble(property="lower rostral length",units="mm",sample_minimum=1,sample_maximum=19.5),
return_property="mantle length",
return_units="mm",
reliability=tibble(type="N",value=43),
notes="Noted by Xavier & Cherel: this equation for mantle_length from LRL might be better than the Clarke (1986) one",
reference=refs$Roel2000),
## Bathyteuthis abyssicola
## ML=1.68+51.59LRL; ln M=2.855+3.38ln LRL (n=17 for both ML and M) (Clarke 1986)
"138848_ML_Clar1986"=list(taxon_name="Bathyteuthis abyssicola",
taxon_aphia_id=138848,
equation=function(...)tibble(allometric_value=1.68+51.59*...),
inputs=tibble(property="lower rostral length",
units="mm"),
return_property="mantle length",
return_units="mm",
reliability=tibble(type="N",value=17),
reference=refs$Clar1986),
"138848_WW_Clar1986"=list(taxon_name="Bathyteuthis abyssicola",
taxon_aphia_id=138848,
equation=function(...)tibble(allometric_value=exp(2.855+3.38*log(...))),
inputs=tibble(property="lower rostral length",
units="mm"),
return_property="wet weight",
return_units="g",
reliability=tibble(type="N",value=17),
reference=refs$Clar1986),
## Batoteuthis skolops (no specific equations)
## May use formulas for close families
## ML=11.4+24.46LRL; ln M=-0.241+2.7ln LRL (n=23 for ML, n=14 for M) (Clarke 1986),
## based on Chiroteuthis spp. formulas
"137777_ML_Clar1986"=list(taxon_name="Chiroteuthis",
taxon_aphia_id=137777,
equation=function(...)tibble(allometric_value=11.4+24.46*...),
inputs=tibble(property="lower rostral length",
units="mm"),
return_property="mantle length",
return_units="mm",
reliability=tibble(type="N",value=23),
reference=refs$Clar1986),
"137777_WW_Clar1986"=list(taxon_name="Chiroteuthis",
taxon_aphia_id=137777,
equation=function(...)tibble(allometric_value=exp(-0.241+2.7*log(...))),
inputs=tibble(property="lower rostral length",
units="mm"),
return_property="wet weight",
return_units="g",
reliability=tibble(type="N",value=14),
reference=refs$Clar1986),
## ML=-1.8+29.08LRL ; ln M=0.184+2.88ln LRL (n=47 for ML, n=45 for M) (Clarke 1986),
## based on Mastigoteuthis spp. formulas
"138168_ML_Clar1986"=list(taxon_name="Mastigoteuthis",
taxon_aphia_id=138168,
equation=function(...)tibble(allometric_value=-1.8+29.08*...),
inputs=tibble(property="lower rostral length",
units="mm"),
return_property="mantle length",
return_units="mm",
reliability=tibble(type="N",value=47),
reference=refs$Clar1986),
"138168_WW_Clar1986"=list(taxon_name="Mastigoteuthis",
taxon_aphia_id=138168,
equation=function(...)tibble(allometric_value=exp(0.184+2.88*log(...))),
inputs=tibble(property="lower rostral length",
units="mm"),
return_property="wet weight",
return_units="g",
reliability=tibble(type="N",value=45),
reference=refs$Clar1986),
## for the species of the family Brachioteuthidae
## ML= 16.31+20.18LRL ; ln M=0.55+1.41ln LRL (n= 11 for both ML and M) (Clarke 1986)
"11758_ML_Clar1986"=list(taxon_name="Brachioteuthidae",
taxon_aphia_id=11758,
equation=function(...)tibble(allometric_value=16.31+20.18*...),
inputs=tibble(property="lower rostral length",
units="mm"),
return_property="mantle length",
return_units="mm",
reliability=tibble(type="N",value=11),
reference=refs$Clar1986),
"11758_WW_Clar1986"=list(taxon_name="Brachioteuthidae",
taxon_aphia_id=11758,
equation=function(...)tibble(allometric_value=exp(0.55+1.41*log(...))),
inputs=tibble(property="lower rostral length",
units="mm"),
return_property="wet weight",
return_units="g",
reliability=tibble(type="N",value=11),
reference=refs$Clar1986),
## Galiteuthis glacialis
##ML=6.676+83.785LRL; log M= 0.415+2.20 log LRL (n=25 for ML and M) (Lu & Williams 1994)
"325297_ML_LuWi1994"=list(taxon_name="Galiteuthis glacialis",
taxon_aphia_id=325297,
equation=function(...)tibble(allometric_value=6.676+83.785*...),
inputs=tibble(property="lower rostral length",
units="mm"),
return_property="mantle length",
return_units="mm",
reliability=tribble(~type,~value,
"N",25,
"R^2",0.96),
reference=refs$LuWi1994),
"325297_WW_LuWi1994"=list(taxon_name="Galiteuthis glacialis",
taxon_aphia_id=325297,
equation=function(...)tibble(allometric_value=exp(0.415+2.20*log(...))),
inputs=tibble(property="lower rostral length",
units="mm"),
return_property="wet weight",
return_units="g",
reliability=tribble(~type,~value,
"N",25,
"R^2",0.94),
reference=refs$LuWi1994),
## Taonius spp. formulas
## ML=-12.3+61.43LRL ; ln M=0.786+2.19 ln LRL (n=72 for ML, n=74 for M) (Rodhouse et al. 1990)
"137853_ML_Rodh1990"=list(taxon_name="Taonius",
taxon_aphia_id=137853,
equation=function(...)tibble(allometric_value=-12.3+61.43*...),
inputs=tibble(property="lower rostral length",
units="mm"),
return_property="mantle length",
return_units="mm",
reliability=tibble(type="N",value=72),
reference=refs$Rodh1990),
"137853_WW_Rodh1990"=list(taxon_name="Taonius",
taxon_aphia_id=137853,
equation=function(...)tibble(allometric_value=exp(0.786+2.19*log(...))),
inputs=tibble(property="lower rostral length",
units="mm"),
return_property="wet weight",
return_units="g",
reliability=tibble(type="N",value=74),
reference=refs$Rodh1990),
## Teuthowenia pellucida
## ML=22.27+29.90LRL ; ln M=0.71+1.94 ln LRL (n=41 for ML and M) (Rodhouse et al. 1990)
"341823_ML_Rodh1990"=list(taxon_name="Teuthowenia pellucida",
taxon_aphia_id=341823,
equation=function(...)tibble(allometric_value=22.27+29.90*(...)),
inputs=tibble(property="lower rostral length",
units="mm"),
return_property="mantle length",
return_units="mm",
reliability=tibble(type="N",value=41),
reference=refs$Rodh1990),
"341823_WW_Rodh1990"=list(taxon_name="Teuthowenia pellucida",
taxon_aphia_id=341823,
equation=function(...)tibble(allometric_value=exp(0.71+1.94*log(...))),
inputs=tibble(property="lower rostral length",
units="mm"),
return_property="wet weight",
return_units="g",
reliability=tibble(type="N",value=41),
reference=refs$Rodh1990),
## Mesonychoteuthis hamiltoni
## ML=-12.3+61.43LRL (n=72) (Rodhouse et al. 1990), although the relationship is weak and
## therefore evaluate carefully if it applies well to your data
"325299_ML_Rodh1990"=list(taxon_name="Mesonychoteuthis hamiltoni",
taxon_aphia_id=325299,
equation=function(...)tibble(allometric_value=-12.3+61.43*(...)),
inputs=tibble(property="lower rostral length",
units="mm"),
return_property="mantle length",
return_units="mm",
reliability=tibble(type="N",value=72),
notes="Noted by Xavier & Cherel: the relationship is weak and therefore evaluate carefully if it applies well to your data",
reference=refs$Rodh1990),
## family Cranchiidae:
## ln M=ln 3.24 + 2.80 ln LRL (Clarke 1962b).
"11774_WW_Clar1962"=list(taxon_name="Cranchiidae",
taxon_aphia_id=11774,
equation=function(...)tibble(allometric_value=exp(log(3.24)+2.80*log(...))),
inputs=tibble(property="lower rostral length",
units="mm"),
return_property="wet weight",
return_units="g",
reference=refs$Clar1962b),
## Cycloteuthis akimushkini
"341824_ML_Clar1986"=list(taxon_name="Cycloteuthis akimushkini",
taxon_aphia_id=341824,
equation=function(...)tibble(allometric_value=31*...),
inputs=tibble(property="lower rostral length",
units="mm"),
return_property="mantle length",
return_units="mm",
reference=refs$Clar1986),
"341824_WW_Clar1986"=list(taxon_name="Cycloteuthis akimushkini",
taxon_aphia_id=341824,
equation=function(...)tibble(allometric_value=exp(1.89+1.95*log(...))),
inputs=tibble(property="lower rostral length",
units="mm"),
return_property="wet weight",
return_units="g",
reference=refs$Clar1986),
## Gonatus spp.
"138036_ML_Clar1986"=list(taxon_name="Gonatus",
taxon_aphia_id=138036,
equation=function(...)tibble(allometric_value=-43.4+42.87*...),
inputs=tibble(property="lower rostral length",
units="mm"),
return_property="mantle length",
return_units="mm",
reliability=tibble(type="N",value=17),
reference=refs$Clar1986),
"138036_WW_Clar1986"=list(taxon_name="Gonatus",
taxon_aphia_id=138036,
equation=function(...)tibble(allometric_value=exp(-0.655+3.33*log(...))),
inputs=tibble(property="lower rostral length",
units="mm"),
return_property="wet weight",
return_units="g",
reliability=tibble(type="N",value=20),
reference=refs$Clar1986),
## The following equations is better for small beaks/specimens:
## ML=12.82+19.02LRL ; ln M=0.086+2.13ln LRL (Clarke 1986)
"138036small_ML_Clar1986"=list(taxon_name="Gonatus",
taxon_aphia_id=138036,
equation=function(...)tibble(allometric_value=12.82+19.02*...),
inputs=tibble(property="lower rostral length",
units="mm"),
return_property="mantle length",
return_units="mm",
notes="Noted by Xavier & Cherel: This equation is better for small beaks/specimens",
reference=refs$Clar1986),
"138036small_WW_Clar1986"=list(taxon_name="Gonatus",
taxon_aphia_id=138036,
equation=function(...)tibble(allometric_value=exp(0.086+2.13*log(...))),
inputs=tibble(property="lower rostral length",
units="mm"),
return_property="wet weight",
return_units="g",
notes="Noted by Xavier & Cherel: This equation is better for small beaks/specimens",
reference=refs$Clar1986),
## Histioteuthis bonnellii corpuscula (valid name Histioteuthis bonnellii)
## ML=17.1+8.99LRL (n=19) (Clarke 1986)
"140111_ML_Clar1986"=list(taxon_name="Histioteuthis bonnellii",
taxon_aphia_id=140111,
equation=function(...)tibble(allometric_value=17.1+8.99*...),
inputs=tibble(property="lower rostral length",
units="mm"),
return_property="mantle length",
return_units="mm",
reliability=tibble(type="N",value=19),
reference=refs$Clar1986),
## ML=1.82+15.24LRL; ln M= 1.16+2.70lnLRL (n=21 for ML and M, using total
## weight of preserved specimens) (Lu & Ickeringill 2002)
"140111_ML_LuIc2002"=list(taxon_name="Histioteuthis bonnellii",
taxon_aphia_id=140111,
equation=function(...)tibble(allometric_value=1.82+15.24*...),
inputs=tibble(property="lower rostral length",
units="mm"),
return_property="mantle length",
return_units="mm",
reliability=tribble(~type,~value,
"N",21,
"R^2",0.93),
reference=refs$LuIc2002),
"140111_WW_LuIc2002"=list(taxon_name="Histioteuthis bonnellii",
taxon_aphia_id=140111,
equation=function(...)tibble(allometric_value=exp(1.16+2.70*log(...))),
inputs=tibble(property="lower rostral length",
units="mm"),
return_property="wet weight",
return_units="g",
reliability=tribble(~type,~value,
"N",21,
"R^2",0.86),
notes="Noted by Lu & Ickeringill: used total weight of preserved specimens",
reference=refs$LuIc2002),
## Histioteuthis macrohista
## ML=2.36+14.46LRL; ln M= 1.16+2.72lnLRL (n=8 for ML and for M, using total
## weight of preserved specimens) (Lu & Ickeringill 2002)
"341870_ML_LuIc2002"=list(taxon_name="Histioteuthis macrohista",
taxon_aphia_id=341870,
equation=function(...)tibble(allometric_value=2.36+14.46*...),
inputs=tibble(property="lower rostral length",
units="mm"),
return_property="mantle length",
return_units="mm",
reliability=tribble(~type,~value,
"N",8,
"R^2",0.96),
reference=refs$LuIc2002),
"341870_WW_LuIc2002"=list(taxon_name="Histioteuthis macrohista",
taxon_aphia_id=341870,
equation=function(...)tibble(allometric_value=exp(1.16+2.72*log(...))),
inputs=tibble(property="lower rostral length",
units="mm"),
return_property="wet weight",
return_units="g",
reliability=tribble(~type,~value,
"N",8,
"R^2",0.96),
notes="Noted by Lu & Ickeringill: used total weight of preserved specimens",
reference=refs$LuIc2002),
## Histioteuthis miranda
## ML=-7.0+25.82LRL ; ln M=1.783+2.44ln LRL (n=27 for ML, n=14 for M) (Clarke
## 1986)
"341871_ML_Clar1986"=list(taxon_name="Histioteuthis miranda",
taxon_aphia_id=341871,
equation=function(...)tibble(allometric_value=-7.0+25.82*...),
inputs=tibble(property="lower rostral length",
units="mm"),
return_property="mantle length",
return_units="mm",
reliability=tibble(type="N",value=27),
reference=refs$Clar1986),
"341871_WW_Clar1986"=list(taxon_name="Histioteuthis miranda",
taxon_aphia_id=341871,
equation=function(...)tibble(allometric_value=exp(1.783+2.44*log(...))),
inputs=tibble(property="lower rostral length",
units="mm"),
return_property="wet weight",
return_units="g",
reliability=tibble(type="N",value=14),
reference=refs$Clar1986),
## ML=-26.51+34.21LRL; ln M= 0.86+3.04lnLRL (n=31 for ML, n=22 for M, using
## total weight of preserved specimens) (Lu & Ickeringill 2002)
"341871_ML_LuIc2002"=list(taxon_name="Histioteuthis miranda",
taxon_aphia_id=341871,
equation=function(...)tibble(allometric_value=-26.51+34.21*...),
inputs=tibble(property="lower rostral length",
units="mm"),
return_property="mantle length",
return_units="mm",
reliability=tribble(~type,~value,
"N",31,
"R^2",0.86),
reference=refs$LuIc2002),
"341871_WW_LuIc2002"=list(taxon_name="Histioteuthis miranda",
taxon_aphia_id=341871,
equation=function(...)tibble(allometric_value=exp(0.86+3.04*log(...))),
inputs=tibble(property="lower rostral length",
units="mm"),
return_property="wet weight",
return_units="g",
reliability=tribble(~type,~value,
"N",22,
"R^2",0.95),
notes="Noted by Lu & Ickeringill: used total weight of preserved specimens",
reference=refs$LuIc2002),
## Histioteuthis atlantica
## ML=-10.42+25.66LRL; ln M= 1.49+2.45lnLRL (n=21 for ML, n=19 for M, using
## total weight of preserved specimens) (Lu & Ickeringill 2002)
"341864_ML_LuIc2002"=list(taxon_name="Histioteuthis atlantica",
taxon_aphia_id=341864,
equation=function(...)tibble(allometric_value=-10.42+25.66*...),
inputs=tibble(property="lower rostral length",
units="mm"),
return_property="mantle length",
return_units="mm",
reliability=tribble(~type,~value,
"N",21,
"R^2",0.89),
reference=refs$LuIc2002),
"341864_WW_LuIc2002"=list(taxon_name="Histioteuthis atlantica",
taxon_aphia_id=341864,
equation=function(...)tibble(allometric_value=exp(1.49+2.45*log(...))),
inputs=tibble(property="lower rostral length",
units="mm"),
return_property="wet weight",
return_units="g",
reliability=tribble(~type,~value,
"N",19,
"R^2",0.91),
notes="Noted by Lu & Ickeringill: used total weight of preserved specimens",
reference=refs$LuIc2002),
## Histioteuthis eltaninae
## ML=-3.65+24.48LRL; ln M= 0.33+3.11lnLRL (n=6 for ML, n=5 for M, using total
## weight of preserved specimens) (Lu & Ickeringill 2002)
"341867_ML_LuIc2002"=list(taxon_name="Histioteuthis eltaninae",
taxon_aphia_id=341867,
equation=function(...)tibble(allometric_value=-3.65+24.48*...),
inputs=tibble(property="lower rostral length",
units="mm"),
return_property="mantle length",
return_units="mm",
reliability=tribble(~type,~value,
"N",6,
"R^2",0.99),
notes="Noted by Lu & Ickeringill: no mature specimens examined.",
reference=refs$LuIc2002),
"341867_WW_LuIc2002"=list(taxon_name="Histioteuthis eltaninae",
taxon_aphia_id=341867,
equation=function(...)tibble(allometric_value=exp(0.33+3.11*log(...))),
inputs=tibble(property="lower rostral length",
units="mm"),
return_property="wet weight",
return_units="g",
reliability=tribble(~type,~value,
"N",5,
"R^2",0.79),
notes="Noted by Lu & Ickeringill: no mature specimens examined. Used total weight of preserved specimens",
reference=refs$LuIc2002),
## Lepidoteuthis grimaldii
## ML=36.2LRL ; ln M=-0.17+3.0ln LRL (British Antarctic Survey, unpublished data)
"140193_ML_BASUnpub"=list(taxon_name="Lepidoteuthis grimaldii",
taxon_aphia_id=140193,
equation=function(...)tibble(allometric_value=36.2*...),
inputs=tibble(property="lower rostral length",
units="mm"),
return_property="mantle length",
return_units="mm",
reference=refs$BASUnpub),
"140193_WW_BASUnpub"=list(taxon_name="Lepidoteuthis grimaldii",
taxon_aphia_id=140193,
equation=function(...)tibble(allometric_value=exp(-0.17+3.0*log(...))),
inputs=tibble(property="lower rostral length",
units="mm"),
return_property="wet weight",
return_units="g",
reference=refs$BASUnpub),
## ML=-10.60+50.57LRL (n=2, using total weight of preserved specimens) (Lu & Ickeringill
## 2002) but this relationship is obviously not strong
"140193_ML_LuIc2002"=list(taxon_name="Lepidoteuthis grimaldii",
taxon_aphia_id=140193,
equation=function(...)tibble(allometric_value=-10.60+50.57*...),
inputs=tibble(property="lower rostral length",
units="mm"),
return_property="mantle length",
return_units="mm",
reliability=tribble(~type,~value,
"N",2,
"R^2",1.0),
reference=refs$LuIc2002),
## Loligo gahi (accepted name Doryteuthis (Amerigo) gahi)
## ln ML= 4.23+1.01lnLRL ; ln M=2.25+2.39lnLRL (n=446) (British Antarctic Survey, unpublished data)
"341880_ML_HatfUnpub"=list(taxon_name="Loligo gahi",
taxon_aphia_id=341880,
equation=function(...)tibble(allometric_value=exp(4.23+1.01*log(...))),
inputs=tibble(property="lower rostral length",
units="mm"),
return_property="mantle length",
return_units="mm",
reliability=tibble(type="N",value=446),
reference=refs$HatfPersComm),
"341880_WW_HatfUnpub"=list(taxon_name="Loligo gahi",
taxon_aphia_id=341880,
equation=function(...)tibble(allometric_value=exp(2.25+2.39*log(...))),
inputs=tibble(property="lower rostral length",
units="mm"),
return_property="wet weight",
return_units="g",
reliability=tibble(type="N",value=446),
reference=refs$HatfPersComm),
## Lycoteuthis lorigera
## ML=-13.04+34.56LRL; ln M= 0.32+3.00lnLRL (n=45 for ML and M, using total weight
## of preserved specimens) (Lu & Ickeringill 2002)
"342361_ML_LuIc2002"=list(taxon_name="Lycoteuthis lorigera",
taxon_aphia_id=342361,
equation=function(...)tibble(allometric_value=-13.04+34.56*...),
inputs=tibble(property="lower rostral length",
units="mm"),
return_property="mantle length",
return_units="mm",
reliability=tribble(~type,~value,
"N",45,
"R^2",0.92),
reference=refs$LuIc2002),
"342361_WW_LuIc2002"=list(taxon_name="Lycoteuthis lorigera",
taxon_aphia_id=342361,
equation=function(...)tibble(allometric_value=exp(0.32+3.00*log(...))),
inputs=tibble(property="lower rostral length",
units="mm"),
return_property="wet weight",
return_units="g",
reliability=tribble(~type,~value,
"N",45,
"R^2",0.95),
notes="Noted by Lu & Ickeringill: used total weight of preserved specimens",
reference=refs$LuIc2002),
## Mastigoteuthis psychrophila
## ML=94.424+6.203LRL ; log M=0.701+1.779logLRL (n=19 for ML and M) (British
## Antarctic Survey, unpublished data)
"341904_ML_BASUnpub"=list(taxon_name="Mastigoteuthis psychrophila",
taxon_aphia_id=341904,
equation=function(...)tibble(allometric_value=94.424+6.203*...),
inputs=tibble(property="lower rostral length",
units="mm"),
return_property="mantle length",
return_units="mm",
reliability=tibble(type="N",value=19),
reference=refs$BASUnpub),
"341904_WW_BASUnpub"=list(taxon_name="Mastigoteuthis psychrophila",
taxon_aphia_id=341904,
equation=function(...)tibble(allometric_value=exp(0.701+1.779*log(...))),
inputs=tibble(property="lower rostral length",
units="mm"),
return_property="wet weight",
return_units="g",
reliability=tibble(type="N",value=19),
reference=refs$BASUnpub),
## Alluroteuthis antarcticus
## ML=-4.301+34.99LRL ; ln M=1.229+2.944ln LRL (n=22) (Piatkowski et al. 2001).
"325302_ML_Piat2001"=list(taxon_name="Alluroteuthis antarcticus",
taxon_aphia_id=325302,
equation=function(...)tibble(allometric_value=-4.301+34.99*...),
inputs=tibble(property="lower rostral length",
units="mm"),
return_property="mantle length",
return_units="mm",
reliability=tibble(type="N",value=22),
reference=refs$Piat2001),
"325302_WW_Piat2001"=list(taxon_name="Alluroteuthis antarcticus",
taxon_aphia_id=325302,
equation=function(...)tibble(allometric_value=exp(1.229+2.944*log(...))),
inputs=tibble(property="lower rostral length",
units="mm"),
return_property="wet weight",
return_units="g",
reliability=tibble(type="N",value=22),
reference=refs$Piat2001),
## Taningia danae
## ML=-556.9+75.22LRL; ln M=-0.874+3.42ln LRL (n=15 for ML and M) (Clarke 1986)
"140609_ML_Clark1986"=list(taxon_name="Taningia danae",
taxon_aphia_id=140609,
equation=function(...)tibble(allometric_value=-556.9+75.22*...),
inputs=tibble(property="lower rostral length",
units="mm"),
return_property="mantle length",
return_units="mm",
reliability=tibble(type="N",value=15),
reference=refs$Clar1986),
"140609_WW_Clark1986"=list(taxon_name="Taningia danae",
taxon_aphia_id=140609,
equation=function(...)tibble(allometric_value=exp(-0.874+3.42*log(...))),
inputs=tibble(property="lower rostral length",
units="mm"),
return_property="wet weight",
return_units="g",
reliability=tibble(type="N",value=15),
reference=refs$Clar1986),
## Octopoteuthis sp.
## ML=-0.4+17.33LRL; ln M=0.166+2.31ln LRL (n=30 for ML, n=22 M) (Clarke 1986)
"138271_ML_Clark1986"=list(taxon_name="Octopoteuthis",
taxon_aphia_id=138271,
equation=function(...)tibble(allometric_value=-0.4+17.33*...),
inputs=tibble(property="lower rostral length",
units="mm"),
return_property="mantle length",
return_units="mm",
reliability=tibble(type="N",value=30),
reference=refs$Clar1986),
"138271_WW_Clark1986"=list(taxon_name="Octopoteuthis",
taxon_aphia_id=138271,
equation=function(...)tibble(allometric_value=exp(0.166+2.31*log(...))),
inputs=tibble(property="lower rostral length",
units="mm"),
return_property="wet weight",
return_units="g",
reliability=tibble(type="N",value=22),
reference=refs$Clar1986),
## Martialia hyadesi
## ML= 102.0+29.47LRL ; ln M=2.405+2.012 ln LRL (n=67 for ML and M) (Rodhouse
## & Yeatman 1990)
"325305_ML_RoYe1990"=list(taxon_name="Martialia hyadesi",
taxon_aphia_id=325305,
equation=function(...)tibble(allometric_value=102.0+29.47*...),
inputs=tibble(property="lower rostral length",
units="mm"),
return_property="mantle length",
return_units="mm",
reliability=tibble(type="N",value=67),
reference=refs$RoYe1990),
"325305_WW_RoYe1990"=list(taxon_name="Martialia hyadesi",
taxon_aphia_id=325305,
equation=function(...)tibble(allometric_value=exp(2.405+2.012*log(...))),
inputs=tibble(property="lower rostral length",
units="mm"),
return_property="wet weight",
return_units="g",
reliability=tibble(type="N",value=67),
reference=refs$RoYe1990),
## Illex argentinus
## ML=-12.228+55.187LRL ; M=2.2750 LRL3.1210 (n=131for ML and M) (Santos & Haimovici 2000)
"342064_ML_SaHa2000"=list(taxon_name="Illex argentinus",
taxon_aphia_id=342064,
equation=function(...)tibble(allometric_value=-12.228+55.187*...),
inputs=tibble(property="lower rostral length",units="mm",sample_minimum=0.4,sample_maximum=6.6),
return_property="mantle length",
return_units="mm",
reliability=tribble(~type,~value,
"N",131,
"R^2",0.989^2),
reference=refs$SaHa2000),
"342064_WW_SaHa2000"=list(taxon_name="Illex argentinus",
taxon_aphia_id=342064,
equation=function(...)tibble(allometric_value=2.2750*(...^3.1210)),
inputs=tibble(property="lower rostral length",units="mm",sample_minimum=0.4,sample_maximum=6.6),
return_property="wet weight",
return_units="g",
reliability=tribble(~type,~value,
"N",131,
"R^2",0.996^2),
reference=refs$SaHa2000),
## Todarodes sp.
## ML=-11.3+41.36LRL ; ln M=0.783+2.83 ln LRL (Clarke 1986)
"138281_ML_Clar1986"=list(taxon_name="Todarodes",
taxon_aphia_id=138281,
equation=function(...)tibble(allometric_value=-11.3+41.36*...),
inputs=tibble(property="lower rostral length",
units="mm"),
return_property="mantle length",
return_units="mm",
reference=refs$Clar1986),
"138281_WW_Clar1986"=list(taxon_name="Todarodes",
taxon_aphia_id=138281,
equation=function(...)tibble(allometric_value=exp(0.783+2.83*log(...))),
inputs=tibble(property="lower rostral length",
units="mm"),
return_property="wet weight",
return_units="g",
reference=refs$Clar1986),
## Kondakovia longimana
## ML=-22.348+37.318LRL ; M=0.713LRL3.152 (n=13 for ML; n=22 for M) (Brown &
## Klages 1987)
"325308_ML_BrKl1987"=list(taxon_name="Kondakovia longimana",
taxon_aphia_id=325308,
equation=function(...)tibble(allometric_value=-22.348+37.318*...),
inputs=tibble(property="lower rostral length",
units="mm"),
return_property="mantle length",
return_units="mm",
reliability=tribble(~type,~value,
"N",13,
"R^2",0.95),
reference=refs$BrKl1987),
"325308_WW_BrKl1987"=list(taxon_name="Kondakovia longimana",
taxon_aphia_id=325308,
equation=function(...)tibble(allometric_value=0.713*(...^3.152)),
inputs=tibble(property="lower rostral length",
units="mm"),
return_property="wet weight",
return_units="g",
reliability=tribble(~type,~value,
"N",22,
"R^2",0.99),
reference=refs$BrKl1987),
## Moroteuthis ingens (valid name Onykia ingens)
## (Jackson 1995):
## Males: ML= 98.59+24.40LRL (n=82); females: ML=-27.84+44.63LRL (n=68)
"410381M_ML_Jack1995"=list(taxon_name="Onykia ingens",
taxon_aphia_id=410381,
equation=function(...)tibble(allometric_value=98.59+24.40*...),
inputs=tibble(property="lower rostral length",
units="mm"),
return_property="mantle length",
return_units="mm",
reliability=tibble(type="N",value=82),
notes="Applies to male animals",
reference=refs$Jack1995),
"410381F_ML_Jack1995"=list(taxon_name="Onykia ingens",
taxon_aphia_id=410381,
equation=function(...)tibble(allometric_value=-27.84+44.63*...),
inputs=tibble(property="lower rostral length",
units="mm"),
return_property="mantle length",
return_units="mm",
reliability=tibble(type="N",value=68),
notes="Applies to female animals",
reference=refs$Jack1995),
## Males: logM= 1.22+1.80logLRL (n=82); females: logM= 0.15+3.25logLRL (n=68)
"410381M_WW_Jack1995"=list(taxon_name="Onykia ingens",
taxon_aphia_id=410381,
equation=function(...)tibble(allometric_value=exp(1.22+1.80*log(...))),
inputs=tibble(property="lower rostral length",
units="mm"),
return_property="wet weight",
return_units="g",
reliability=tibble(type="N",value=82),
notes="Applies to male animals",
reference=refs$Jack1995),
"410381F_WW_Jack1995"=list(taxon_name="Onykia ingens",
taxon_aphia_id=410381,
equation=function(...)tibble(allometric_value=exp(0.15+3.25*log(...))),
inputs=tibble(property="lower rostral length",
units="mm"),
return_property="wet weight",
return_units="g",
reliability=tibble(type="N",value=68),
notes="Applies to female animals",
reference=refs$Jack1995),
## Moroteuthis knipovitchi (valid name is Filippovia knipovitchi)
## ML=-105.707+62.369LRL; ln M=-0.881+3.798lnLRL (n=7 for ML, n=5 for M) (Cherel,
## unpublished data)
"325310_ML_CherUnpub"=list(taxon_name="Moroteuthis knipovitchi",
taxon_aphia_id=325310,
equation=function(...)tibble(allometric_value=-105.707+62.369*...),
inputs=tibble(property="lower rostral length",
units="mm"),
return_property="mantle length",
return_units="mm",
reliability=tibble(type="N",value=7),
reference=refs$CherUnpub),
"325310_WW_CherUnpub"=list(taxon_name="Moroteuthis knipovitchi",
taxon_aphia_id=325310,
equation=function(...)tibble(allometric_value=exp(-0.881+3.798*log(...))),
inputs=tibble(property="lower rostral length",
units="mm"),
return_property="wet weight",
return_units="g",
reliability=tibble(type="N",value=5),
reference=refs$CherUnpub),
## Moroteuthis robsoni (valid name Onykia robsoni)
## ML=-652.91+151.03LRL; ln M= -9.15+8.07lnLRL (n=8 for ML, n=6 for M, using total
## weight of preserved specimens) (Lu & Ickeringill 2002)
"342256_ML_LuIc2002"=list(taxon_name="Moroteuthis robsoni",
taxon_aphia_id=342256,
equation=function(...)tibble(allometric_value=-652.91+151.03*...),
inputs=tibble(property="lower rostral length",
units="mm"),
return_property="mantle length",
return_units="mm",
reliability=tribble(~type,~value,
"N",8,
"R^2",0.87),
reference=refs$LuIc2002),
"342256_WW_LuIc2002"=list(taxon_name="Moroteuthis robsoni",
taxon_aphia_id=342256,
equation=function(...)tibble(allometric_value=exp(-9.15+8.07*log(...))),
inputs=tibble(property="lower rostral length",
units="mm"),
return_property="wet weight",
return_units="g",
reliability=tribble(~type,~value,
"N",6,
"R^2",0.94),
notes="Noted by Lu & Ickeringill: used total weight of preserved specimens",
reference=refs$LuIc2002),
## Onychoteuthis banksii
## ML=2.31+32.75LRL; ln M= -0.04+2.80lnLRL (n=10 for ML and M, using total weight
## of preserved specimens) (Lu & Ickeringill 2002)
"140649_ML_LuIc2002"=list(taxon_name="Onychoteuthis banksii",
taxon_aphia_id=140649,
equation=function(...)tibble(allometric_value=2.31+32.75*...),
inputs=tibble(property="lower rostral length",
units="mm"),
return_property="mantle length",
return_units="mm",
reliability=tribble(~type,~value,
"N",10,
"R^2",0.86),
reference=refs$LuIc2002),
"140649_WW_LuIc2002"=list(taxon_name="Onychoteuthis banksii",
taxon_aphia_id=140649,
equation=function(...)tibble(allometric_value=exp(-0.04+2.80*log(...))),
inputs=tibble(property="lower rostral length",
units="mm"),
return_property="wet weight",
return_units="g",
reliability=tribble(~type,~value,
"N",10,
"R^2",0.94),
notes="Noted by Lu & Ickeringill: used total weight of preserved specimens",
reference=refs$LuIc2002),
## Pholidoteuthis massyae
## ML=11.3+41.09LRL ; ln M=0.976+2.83ln LRL (n=12 for ML, n=15 for M) (Clarke 1986)
"410388_ML_Clar1986"=list(taxon_name="Pholidoteuthis massyae",
taxon_aphia_id=410388,
equation=function(...)tibble(allometric_value=11.3+41.09*...),
inputs=tibble(property="lower rostral length",
units="mm"),
return_property="mantle length",
return_units="mm",
reliability=tibble(type="N",value=12),
reference=refs$Clar1986),
"410388_WW_Clar1986"=list(taxon_name="Pholidoteuthis massyae",
taxon_aphia_id=410388,
equation=function(...)tibble(allometric_value=exp(0.976+2.83*log(...))),
inputs=tibble(property="lower rostral length",
units="mm"),
return_property="wet weight",
return_units="g",
reliability=tibble(type="N",value=15),
reference=refs$Clar1986),
## Psychroteuthis glacialis
## ML= 50.6895LRL-8.6008LRL2+1.0823LRL3-8.7019 (n=211, R^2=0.93) ; ln M = 0.3422+2.1380
## lnLRL+0.2214lnLRL3 (n=211,R^2=0.95) (Groger et al. 2000)
## Groger J, Piatkowski U, Heinemann H (2000) Beak length analysis of the Southern Ocean squid Psychroteuthis glacialis (Cephalopoda: Psychroteuthidae) and its use for size and biomass estimation. Polar Biology 23:70-74. doi:10.1007/s003000050009
"325312_ML_Grog2000"=list(taxon_name="Psychroteuthis glacialis",
taxon_aphia_id=325312,
equation=function(...)tibble(allometric_value=50.6895*...-8.6008*(...^2)+1.0823*(...^3)-8.7019),
inputs=tibble(property="lower rostral length",units="mm",sample_minimum=0.3,sample_maximum=8.0),
return_property="mantle length",
return_units="mm",
reliability=tribble(~type,~value,
"N",211,
"R^2",0.93),
reference=refs$Grog2000),
"325312_WW_Grog2000"=list(taxon_name="Psychroteuthis glacialis",
taxon_aphia_id=325312,
equation=function(...)tibble(allometric_value=exp(0.3422+2.1380*log(...)+0.2214*(log(...)^3)^3)),
inputs=tibble(property="lower rostral length",units="mm",sample_minimum=0.3,sample_maximum=8.0),
return_property="wet weight",
return_units="g",
reliability=tribble(~type,~value,
"N",211,
"R^2",0.95),
reference=refs$Grog2000),
## Haliphron atlanticus
## Ln M=2.5+1.45ln LRL (British Antarctic Survey, unpublished data)
"341781_WW_BASUnpub"=list(taxon_name="Haliphron atlanticus",
taxon_aphia_id=341781,
equation=function(...)tibble(allometric_value=exp(2.5+1.45*log(...))),
inputs=tibble(property="lower rostral length",
units="mm"),
return_property="wet weight",
return_units="g",
reference=refs$BASUnpub),
## Pareledone turqueti
## ML=17.70487+ 13.32812LHL; LnM =0.689269+2.542938LnLHL (n=7 for ML, n=23 for
## M), where LHL= lower hood length (in mm) (Collins, unpublished data)
"239393_ML_CollUnpub"=list(taxon_name="Pareledone turqueti",
taxon_aphia_id=239393,
equation=function(...)tibble(allometric_value=17.70487+13.32812*...),
inputs=tibble(property="lower hood length",
units="mm"),
return_property="mantle length",
return_units="mm",
reliability=tribble(~type,~value,
"N",7),
reference=refs$CollUnpub),
"239393_WW_CollUnpub"=list(taxon_name="Pareledone turqueti",
taxon_aphia_id=239393,
equation=function(...)tibble(allometric_value=exp(0.689269+2.542938*log(...))),
inputs=tibble(property="lower hood length",
units="mm"),
return_property="wet weight",
return_units="g",
reliability=tribble(~type,~value,
"N",23),
reference=refs$CollUnpub),
## Adelieledone polymorpha
## ML= -7,426229508+25,16393443LHL; Ln M =1,077552+3,200449LnLHL
## (n=3 for ML, n= 39 for M) (Collins, unpublished data)
"325319_ML_CollUnpub"=list(taxon_name="Adelieledone polymorpha",
taxon_aphia_id=325319,
equation=function(...)tibble(allometric_value=-7.426229508+25.16393443*...),
inputs=tibble(property="lower hood length",
units="mm"),
return_property="mantle length",
return_units="mm",
reliability=tribble(~type,~value,
"N",3),
reference=refs$CollUnpub),
"325319_WW_CollUnpub"=list(taxon_name="Adelieledone polymorpha",
taxon_aphia_id=325319,
equation=function(...)tibble(allometric_value=exp(1.077552+3.200449*log(...))),
inputs=tibble(property="lower hood length",
units="mm"),
return_property="wet weight",
return_units="g",
reliability=tribble(~type,~value,
"N",39),
reference=refs$CollUnpub),
## Benthoctopus thielei (valid name is Muusoctopus thielei)
## ML = 7.398+12.569LHL; lnM= 0.471+2.706lnLHL (n=48 for ML and M) (Cherel,
## unpublished data)
"341931_ML_CherUnpub"=list(taxon_name="Benthoctopus thielei",
taxon_aphia_id=341931,
equation=function(...)tibble(allometric_value=7.398+12.569*...),
inputs=tibble(property="lower hood length",
units="mm"),
return_property="mantle length",
return_units="mm",
reliability=tribble(~type,~value,
"N",48),
reference=refs$CherUnpub),
"341931_WW_CherUnpub"=list(taxon_name="Benthoctopus thielei",
taxon_aphia_id=341931,
equation=function(...)tibble(allometric_value=exp(0.471+2.706*log(...))),
inputs=tibble(property="lower hood length",
units="mm"),
return_property="wet weight",
return_units="g",
reliability=tribble(~type,~value,
"N",48),
reference=refs$CherUnpub),
## Graneledone gonzalezi
## ML = 5.047+13.004LHL; lnM= 0.288+2.967lnLHL (n=54 for ML and M) (Cherel,
## unpublished data)
"342224_ML_CherUnpub"=list(taxon_name="Graneledone gonzalezi",
taxon_aphia_id=342224,
equation=function(...)tibble(allometric_value=5.047+13.004*...),
inputs=tibble(property="lower hood length",
units="mm"),
return_property="mantle length",
return_units="mm",
reliability=tribble(~type,~value,
"N",54),
reference=refs$CherUnpub),
"342224_WW_CherUnpub"=list(taxon_name="Graneledone gonzalezi",
taxon_aphia_id=342224,
equation=function(...)tibble(allometric_value=exp(0.288+2.967*log(...))),
inputs=tibble(property="lower hood length",
units="mm"),
return_property="wet weight",
return_units="g",
reliability=tribble(~type,~value,
"N",54),
reference=refs$CherUnpub),
## Opisthoteuthis sp.
## ML=-26.0047+12.4858CL; logM=0.5893+0.2413CL (n= 13 for ML, n=9 for M) (Smale
## et al. 1993) where CL = Crest length (in mm)
## included in equations_Smal1993.R
stop("unrecognized equation ID: ",id))
}
SCAR/solong documentation built on Aug. 5, 2022, 9:04 p.m.
R Package Documentation
Browse R Packages
We want your feedback!
Note that we can't provide technical support on individual packages. You should contact the package authors for that.
refs <- c(refs,list(
XC=bibentry(bibtype="Book",key="XC",year=2009,
title="Cephalopod beak guide for the Southern Ocean",
author=c(person("J","Xavier"),person("Y","Cherel")),publisher="British Antarctic Survey",
address="Cambridge",pages=129),
Clar1986=bibentry(bibtype="Misc",key="Clar1986",
author=person(c("M","R"),"Clarke"),
year=1986,title="A handbook for the identification of cephalopod beaks. Clarendon Press, Oxford",
howpublished="As cited in Xavier J & Cherel Y (2009 updated 2016) Cephalopod beak guide for the Southern Ocean. Cambridge, British Antarctic Survey, 129pp."),
Roel2000=bibentry(bibtype="Article",key="Roel2000",
author=person(c("M","A","C"),"Roeleveld"),year=2000,
title="Giant squid beaks: implications for systematics",
journal="Journal of the Marine Biological Association of the UK",
volume=80,pages="185-187"),
LuWi1994=bibentry(bibtype="Article",key="LuWi1994",
author=c(person(c("C","C"),"Lu"),person("R","Williams")),
year=1994,
title="Contribution to the biology of squid in the Prydz Bay region, Antarctica",
journal="Antarctic Science",volume=6,pages="223-229",doi="10.1017/S0954102094000349"),
Rodh1990=bibentry(bibtype="Article",key="Rodh1990",
author=c(person(c("P","G"),"Rodhouse"),person(c("P","A"),"Prince"),person(c("M","R"),"Clarke"),person(c("A","W","A"),"Murray")),
year=1990,title="Cephalopod prey of the grey-headed albatross Diomedea chrysostoma",
journal="Marine Biology",volume=104,pages="353-362",doi="10.1007/BF01314337",
note="As cited in Xavier J & Cherel Y (2009 updated 2016) Cephalopod beak guide for the Southern Ocean. Cambridge, British Antarctic Survey, 129pp."),
Clar1962b=bibentry(bibtype="Article",key="Clar1962b",
author=c(person(c("M"),"Clarke")),
year=1962,title="The identification of cephalopod \"beaks\" and the relationship between beak size and total body weight",
journal="Bulletin of the British Museum of Natural History B",
volume=8,pages="421-480",
note="As cited in Xavier J & Cherel Y (2009 updated 2016) Cephalopod beak guide for the Southern Ocean. Cambridge, British Antarctic Survey, 129pp."),
LuIc2002=bibentry(bibtype="Article",key="LuIc2002",
author=c(person(c("C","C"),"Lu"),person("R","Ickeringill")),
year=2002,
title="Cephalopod beak identification and biomass estimation techniques: tools for dietary studies of southern Australian finfishes",
journal="Museum Victoria Science Reports",
volume=6,pages="1-65"),
BASUnpub=bibentry(bibtype="Unpublished",key="BASUnpub",
author=person(family="BAS"),
title="Unpublished data",
note="As cited in Xavier J & Cherel Y (2009 updated 2016) Cephalopod beak guide for the Southern Ocean. Cambridge, British Antarctic Survey, 129pp."),
Piat2001=bibentry(bibtype="Article",key="Piat2001",
author=c(person("U","Piatkowski"),person("K","P\uFCtz"),person("H","Heinemann")),
year=2001,
title="Cephalopod prey of king penguins (Aptenodytes patagonicus) breeding at Volunteer Beach, Falkland Islands, during austral winter 1996",
journal="Fisheries Research",volume=52,pages="79-90",
doi="10.1016/S0165-7836(01)00232-6"),
HatfPersComm=bibentry(bibtype="Misc",key="HatfPersComm",
author=person("Hatfield"),
year="2001",
howpublished="Pers. comm., as cited in Piatkowski U, P\uFCtz K, Heinemann H (2001) Cephalopod prey of king penguins (Aptenodytes patagonicus) breeding at Volunteer Beach, Falkland Islands, during austral winter 1996. Fisheries Research 52:79-90. doi:10.1016/S0165-7836(01)00232-6"),
RoYe1990=bibentry(bibtype="Article",key="RoYe1990",
author=c(person(c("P","G"),"Rodhouse"),person(c("J"),"Yeatman")),
year=1990,title="Redescription of Martialia hyadesi Rochbrune and Mabille, 1889 (Mollusca: Cephalopoda) from the Southern Ocean",
journal="Bulletin of the British Museum of Natural History (Zoology)",
volume=56,pages="135-143",
note="As cited in Xavier J & Cherel Y (2009 updated 2016) Cephalopod beak guide for the Southern Ocean. Cambridge, British Antarctic Survey, 129pp."),
SaHa2000=bibentry(bibtype="Article",key="SaHa2000",
author=c(person(c("R","A"),"Santos"),person(c("M"),"Haimovici")),
year=2000,title="The Argentine short-finned squid Illex argentinus in the food webs of southern Brazil",
journal="Sarsia",
volume=85,pages="49-60",doi="10.1080/00364827.2000.10414554"),
BrKl1987=bibentry(bibtype="Article",key="",
author=c(person(c("C","R"),"Brown"),person(c("N","T"),"Klages")),
year=1987,
title="Seasonal and annual variation in diets of macaroni (Eudyptes chrysolophus chrysolophus) and southern rockhopper (E. chrysocome chrysocome) penguins at sub-Antarctic Marion Island",
journal="Journal of Zoology, London",
volume=212,pages="7-28",doi="10.1111/j.1469-7998.1987.tb05111.x",
note="As cited in Xavier J & Cherel Y (2009 updated 2016) Cephalopod beak guide for the Southern Ocean. Cambridge, British Antarctic Survey, 129pp."),
Jack1995=bibentry(bibtype="Article",key="Jack1995",
author=c(person(c("G","D"),"Jackson")),
year=1995,title="The use of beaks as tools for biomass estimation in the deepwater squid Moroteuthis ingens (Cephalopoda: Onychoteuthidae) in New Zealand waters",
journal="Polar Biology",
volume=15,pages="9-14",doi="10.1007/BF00236118",
note="As cited in Xavier J & Cherel Y (2009 updated 2016) Cephalopod beak guide for the Southern Ocean. Cambridge, British Antarctic Survey, 129pp."),
CherUnpub=bibentry(bibtype="Unpublished",key="CherUnpub",
author=person("Y","Cherel"),
title="Unpublished data",
note="As cited in Xavier J & Cherel Y (2009 updated 2016) Cephalopod beak guide for the Southern Ocean. Cambridge, British Antarctic Survey, 129pp."),
Grog2000=bibentry(bibtype="Article",key="Grog2000",
author=c(person("J","Gr\uF6ger"),person("U","Piatkowski"),person("H","Heinemann")),
year=2000,
title="Beak length analysis of the Southern Ocean squid Psychroteuthis glacialis (Cephalopoda: Psychroteuthidae) and its use for size and biomass estimation",
journal="Polar Biology",volume=23,
pages="70-74",doi="10.1007/s003000050009"),
CollUnpub=bibentry(bibtype="Unpublished",key="CollUnpub",
author=person(family="Collins"),
title="Unpublished data",
note="As cited in Xavier J & Cherel Y (2009 updated 2016) Cephalopod beak guide for the Southern Ocean. Cambridge, British Antarctic Survey, 129pp.")))
##oldrefs <- c(oldrefs,list(
## XC="Xavier J & Cherel Y (2009 updated 2016) Cephalopod beak guide for the Southern Ocean. Cambridge, British Antarctic Survey, 129pp.",
## Clar1986="Clarke (1986) in Xavier J & Cherel Y (2009 updated 2016) Cephalopod beak guide for the Southern Ocean. Cambridge, British Antarctic Survey, 129pp.",##"Clarke MR (1986) A handbook for the identification of cephalopod beaks. Clarendon Press, Oxford",
## Roel2000="Roeleveld (2000) in Xavier J & Cherel Y (2009 updated 2016) Cephalopod beak guide for the Southern Ocean. Cambridge, British Antarctic Survey, 129pp.", ##Roeleveld MAC (2000) Giant squid beaks: implications for systematics. Journal of the Marine Biological Association of the UK 80: 185-187
## LuWi1994="Lu CC, Williams R (1994) Contribution to the biology of squid in the Prydz Bay region, Antarctica. Antarctic Science 6: 223-229",
## Rodh1990="Rodhouse et al. (1990) in Xavier J & Cherel Y (2009 updated 2016) Cephalopod beak guide for the Southern Ocean. Cambridge, British Antarctic Survey, 129pp.", ##Rodhouse PG, Prince PA, Clarke MR, Murray AWA (1990) Cephalopod prey of the grey-headed albatross Diomedea chrysostoma. Marine Biology 104: 353-362
## Clar1962b="Clarke (1962b) in Xavier J & Cherel Y (2009 updated 2016) Cephalopod beak guide for the Southern Ocean. Cambridge, British Antarctic Survey, 129pp.", ##Clarke M (1962b) The identification of cephalopod "beaks" and the relationship between beak size and total body weight. Bulletin of the British Museum of Natural History B 8(10), 421-480
## LuIc2002="Lu CC & Ickeringill R (2002) Cephalopod beak identification and biomass estimation techniques: tools for dietary studies of southern Australian finfishes. Museum Victoria Science Reports 6:1-65",
## BASUnpub="BAS (unpublished data) in Xavier J & Cherel Y (2009 updated 2016) Cephalopod beak guide for the Southern Ocean. Cambridge, British Antarctic Survey, 129pp.",
## Piat2001="Piatkowski U, P\uFCtz K, Heinemann H (2001) Cephalopod prey of king penguins (Aptenodytes patagonicus) breeding at Volunteer Beach, Falkland Islands, during austral winter 1996. Fisheries Research 52:79-90. doi:10.1016/S0165-7836(01)00232-6",
## RoYe1990="Rodhouse & Yeatman (1990) in Xavier J & Cherel Y (2009 updated 2016) Cephalopod beak guide for the Southern Ocean. Cambridge, British Antarctic Survey, 129pp.", ##Rodhouse PG, Yeatman J (1990) Redescription of Martialia hyadesi Rochbrune and Mabille, 1889 (Mollusca: Cephalopoda) from the Southern Ocean. Bulletin of the British Museum of Natural History (Zoology) 56: 135-143
## SaHa2000="Santos RA, Haimovici M (2000) The Argentine short-finned squid Illex argentinus in the food webs of southern Brazil. Sarsia 85: 49-60",
## BrKl1987="Brown & Klages (1987) in Xavier J & Cherel Y (2009 updated 2016) Cephalopod beak guide for the Southern Ocean. Cambridge, British Antarctic Survey, 129pp.", ##Brown CR, Klages NT (1987) Seasonal and annual variation in diets of macaroni (Eudyptes chrysolophus chrysolophus) and southern rockhopper (E. chrysocome chrysocome) penguins at sub-Antarctic Marion Island. Journal of Zoology, London 212: 7-28
## Jack1995="Jackson (1995) in Xavier J & Cherel Y (2009 updated 2016) Cephalopod beak guide for the Southern Ocean. Cambridge, British Antarctic Survey, 129pp.", ##Jackson GD (1995) The use of beaks as tools for biomass estimation in the deepwater squid Moroteuthis ingens (Cephalopoda: Onychoteuthidae) in New Zealand waters. Polar Biology 15: 9-14
## CherUnpub="Cherel (unpublished data) in Xavier J & Cherel Y (2009 updated 2016) Cephalopod beak guide for the Southern Ocean. Cambridge, British Antarctic Survey, 129pp.",
## Grog2000="Gr\uF6ger J, Piatkowski U, Heinemann H (2000) Beak length analysis of the Southern Ocean squid Psychroteuthis glacialis (Cephalopoda: Psychroteuthidae) and its use for size and biomass estimation. Polar Biology 23:70-74. doi:10.1007/s003000050009",
## CollUnpub="Collins (unpublished data) in Xavier J & Cherel Y (2009 updated 2016) Cephalopod beak guide for the Southern Ocean. Cambridge, British Antarctic Survey, 129pp."))
alleq_XaCh2016 <- function(id) {
switch(id,
## Ancistrocheirus lesueurii
## ML=-41.3+40.75LRL ; ln M=-0.194+3.56ln LRL (n=23 for ML, n=21 for M) (Clarke 1986)
"138747_ML_Clar1986"=list(taxon_name="Ancistrocheirus lesueurii",
taxon_aphia_id=138747,
equation=function(...)tibble(allometric_value=-41.3+40.75*...),
inputs=tibble(property="lower rostral length",
units="mm"),
return_property="mantle length",
return_units="mm",
reliability=tibble(type="N",value=23),
reference=refs$Clar1986),
"138747_WW_Clar1986"=list(taxon_name="Ancistrocheirus lesueurii",
taxon_aphia_id=138747,
equation=function(...)tibble(allometric_value=exp(-0.194+3.56*log(...))),
inputs=tibble(property="lower rostral length",
units="mm"),
return_property="wet weight",
return_units="g",
reliability=tibble(type="N",value=21),
reference=refs$Clar1986),
## Architeuthis dux
## ML=-55.6+59.31LRL ; ln M=-1.773+4.57ln LRL (n=11 for ML; n=9 for M) (Clarke 1986)
## For relationships between ML and LRL, ML=10((LRL/11.2)+1.723214286) (n=43) might be
## better (Roeleveld 2000) with ML= mantle length (in mm), M= mass (in g) and LRL=
## lower rostral length (in mm).
"342218_ML_Clar1986"=list(taxon_name="Architeuthis dux",
taxon_aphia_id=342218,
equation=function(...)tibble(allometric_value=-55.6+59.31*...),
inputs=tibble(property="lower rostral length",
units="mm"),
return_property="mantle length",
return_units="mm",
reliability=tibble(type="N",value=11),
reference=refs$Clar1986),
"342218_WW_Clar1986"=list(taxon_name="Architeuthis dux",
taxon_aphia_id=342218,
equation=function(...)tibble(allometric_value=exp(-1.773+4.57*log(...))),
inputs=tibble(property="lower rostral length",
units="mm"),
return_property="wet weight",
return_units="g",
reliability=tibble(type="N",value=9),
reference=refs$Clar1986),
"342218_ML_Roel2000"=list(taxon_name="Architeuthis dux",
taxon_aphia_id=342218,
equation=function(...)tibble(allometric_value=10^((.../11.2)+1.723214286)),
inputs=tibble(property="lower rostral length",units="mm",sample_minimum=1,sample_maximum=19.5),
return_property="mantle length",
return_units="mm",
reliability=tibble(type="N",value=43),
notes="Noted by Xavier & Cherel: this equation for mantle_length from LRL might be better than the Clarke (1986) one",
reference=refs$Roel2000),
## Bathyteuthis abyssicola
## ML=1.68+51.59LRL; ln M=2.855+3.38ln LRL (n=17 for both ML and M) (Clarke 1986)
"138848_ML_Clar1986"=list(taxon_name="Bathyteuthis abyssicola",
taxon_aphia_id=138848,
equation=function(...)tibble(allometric_value=1.68+51.59*...),
inputs=tibble(property="lower rostral length",
units="mm"),
return_property="mantle length",
return_units="mm",
reliability=tibble(type="N",value=17),
reference=refs$Clar1986),
"138848_WW_Clar1986"=list(taxon_name="Bathyteuthis abyssicola",
taxon_aphia_id=138848,
equation=function(...)tibble(allometric_value=exp(2.855+3.38*log(...))),
inputs=tibble(property="lower rostral length",
units="mm"),
return_property="wet weight",
return_units="g",
reliability=tibble(type="N",value=17),
reference=refs$Clar1986),
## Batoteuthis skolops (no specific equations)
## May use formulas for close families
## ML=11.4+24.46LRL; ln M=-0.241+2.7ln LRL (n=23 for ML, n=14 for M) (Clarke 1986),
## based on Chiroteuthis spp. formulas
"137777_ML_Clar1986"=list(taxon_name="Chiroteuthis",
taxon_aphia_id=137777,
equation=function(...)tibble(allometric_value=11.4+24.46*...),
inputs=tibble(property="lower rostral length",
units="mm"),
return_property="mantle length",
return_units="mm",
reliability=tibble(type="N",value=23),
reference=refs$Clar1986),
"137777_WW_Clar1986"=list(taxon_name="Chiroteuthis",
taxon_aphia_id=137777,
equation=function(...)tibble(allometric_value=exp(-0.241+2.7*log(...))),
inputs=tibble(property="lower rostral length",
units="mm"),
return_property="wet weight",
return_units="g",
reliability=tibble(type="N",value=14),
reference=refs$Clar1986),
## ML=-1.8+29.08LRL ; ln M=0.184+2.88ln LRL (n=47 for ML, n=45 for M) (Clarke 1986),
## based on Mastigoteuthis spp. formulas
"138168_ML_Clar1986"=list(taxon_name="Mastigoteuthis",
taxon_aphia_id=138168,
equation=function(...)tibble(allometric_value=-1.8+29.08*...),
inputs=tibble(property="lower rostral length",
units="mm"),
return_property="mantle length",
return_units="mm",
reliability=tibble(type="N",value=47),
reference=refs$Clar1986),
"138168_WW_Clar1986"=list(taxon_name="Mastigoteuthis",
taxon_aphia_id=138168,
equation=function(...)tibble(allometric_value=exp(0.184+2.88*log(...))),
inputs=tibble(property="lower rostral length",
units="mm"),
return_property="wet weight",
return_units="g",
reliability=tibble(type="N",value=45),
reference=refs$Clar1986),
## for the species of the family Brachioteuthidae
## ML= 16.31+20.18LRL ; ln M=0.55+1.41ln LRL (n= 11 for both ML and M) (Clarke 1986)
"11758_ML_Clar1986"=list(taxon_name="Brachioteuthidae",
taxon_aphia_id=11758,
equation=function(...)tibble(allometric_value=16.31+20.18*...),
inputs=tibble(property="lower rostral length",
units="mm"),
return_property="mantle length",
return_units="mm",
reliability=tibble(type="N",value=11),
reference=refs$Clar1986),
"11758_WW_Clar1986"=list(taxon_name="Brachioteuthidae",
taxon_aphia_id=11758,
equation=function(...)tibble(allometric_value=exp(0.55+1.41*log(...))),
inputs=tibble(property="lower rostral length",
units="mm"),
return_property="wet weight",
return_units="g",
reliability=tibble(type="N",value=11),
reference=refs$Clar1986),
## Galiteuthis glacialis
##ML=6.676+83.785LRL; log M= 0.415+2.20 log LRL (n=25 for ML and M) (Lu & Williams 1994)
"325297_ML_LuWi1994"=list(taxon_name="Galiteuthis glacialis",
taxon_aphia_id=325297,
equation=function(...)tibble(allometric_value=6.676+83.785*...),
inputs=tibble(property="lower rostral length",
units="mm"),
return_property="mantle length",
return_units="mm",
reliability=tribble(~type,~value,
"N",25,
"R^2",0.96),
reference=refs$LuWi1994),
"325297_WW_LuWi1994"=list(taxon_name="Galiteuthis glacialis",
taxon_aphia_id=325297,
equation=function(...)tibble(allometric_value=exp(0.415+2.20*log(...))),
inputs=tibble(property="lower rostral length",
units="mm"),
return_property="wet weight",
return_units="g",
reliability=tribble(~type,~value,
"N",25,
"R^2",0.94),
reference=refs$LuWi1994),
## Taonius spp. formulas
## ML=-12.3+61.43LRL ; ln M=0.786+2.19 ln LRL (n=72 for ML, n=74 for M) (Rodhouse et al. 1990)
"137853_ML_Rodh1990"=list(taxon_name="Taonius",
taxon_aphia_id=137853,
equation=function(...)tibble(allometric_value=-12.3+61.43*...),
inputs=tibble(property="lower rostral length",
units="mm"),
return_property="mantle length",
return_units="mm",
reliability=tibble(type="N",value=72),
reference=refs$Rodh1990),
"137853_WW_Rodh1990"=list(taxon_name="Taonius",
taxon_aphia_id=137853,
equation=function(...)tibble(allometric_value=exp(0.786+2.19*log(...))),
inputs=tibble(property="lower rostral length",
units="mm"),
return_property="wet weight",
return_units="g",
reliability=tibble(type="N",value=74),
reference=refs$Rodh1990),
## Teuthowenia pellucida
## ML=22.27+29.90LRL ; ln M=0.71+1.94 ln LRL (n=41 for ML and M) (Rodhouse et al. 1990)
"341823_ML_Rodh1990"=list(taxon_name="Teuthowenia pellucida",
taxon_aphia_id=341823,
equation=function(...)tibble(allometric_value=22.27+29.90*(...)),
inputs=tibble(property="lower rostral length",
units="mm"),
return_property="mantle length",
return_units="mm",
reliability=tibble(type="N",value=41),
reference=refs$Rodh1990),
"341823_WW_Rodh1990"=list(taxon_name="Teuthowenia pellucida",
taxon_aphia_id=341823,
equation=function(...)tibble(allometric_value=exp(0.71+1.94*log(...))),
inputs=tibble(property="lower rostral length",
units="mm"),
return_property="wet weight",
return_units="g",
reliability=tibble(type="N",value=41),
reference=refs$Rodh1990),
## Mesonychoteuthis hamiltoni
## ML=-12.3+61.43LRL (n=72) (Rodhouse et al. 1990), although the relationship is weak and
## therefore evaluate carefully if it applies well to your data
"325299_ML_Rodh1990"=list(taxon_name="Mesonychoteuthis hamiltoni",
taxon_aphia_id=325299,
equation=function(...)tibble(allometric_value=-12.3+61.43*(...)),
inputs=tibble(property="lower rostral length",
units="mm"),
return_property="mantle length",
return_units="mm",
reliability=tibble(type="N",value=72),
notes="Noted by Xavier & Cherel: the relationship is weak and therefore evaluate carefully if it applies well to your data",
reference=refs$Rodh1990),
## family Cranchiidae:
## ln M=ln 3.24 + 2.80 ln LRL (Clarke 1962b).
"11774_WW_Clar1962"=list(taxon_name="Cranchiidae",
taxon_aphia_id=11774,
equation=function(...)tibble(allometric_value=exp(log(3.24)+2.80*log(...))),
inputs=tibble(property="lower rostral length",
units="mm"),
return_property="wet weight",
return_units="g",
reference=refs$Clar1962b),
## Cycloteuthis akimushkini
"341824_ML_Clar1986"=list(taxon_name="Cycloteuthis akimushkini",
taxon_aphia_id=341824,
equation=function(...)tibble(allometric_value=31*...),
inputs=tibble(property="lower rostral length",
units="mm"),
return_property="mantle length",
return_units="mm",
reference=refs$Clar1986),
"341824_WW_Clar1986"=list(taxon_name="Cycloteuthis akimushkini",
taxon_aphia_id=341824,
equation=function(...)tibble(allometric_value=exp(1.89+1.95*log(...))),
inputs=tibble(property="lower rostral length",
units="mm"),
return_property="wet weight",
return_units="g",
reference=refs$Clar1986),
## Gonatus spp.
"138036_ML_Clar1986"=list(taxon_name="Gonatus",
taxon_aphia_id=138036,
equation=function(...)tibble(allometric_value=-43.4+42.87*...),
inputs=tibble(property="lower rostral length",
units="mm"),
return_property="mantle length",
return_units="mm",
reliability=tibble(type="N",value=17),
reference=refs$Clar1986),
"138036_WW_Clar1986"=list(taxon_name="Gonatus",
taxon_aphia_id=138036,
equation=function(...)tibble(allometric_value=exp(-0.655+3.33*log(...))),
inputs=tibble(property="lower rostral length",
units="mm"),
return_property="wet weight",
return_units="g",
reliability=tibble(type="N",value=20),
reference=refs$Clar1986),
## The following equations is better for small beaks/specimens:
## ML=12.82+19.02LRL ; ln M=0.086+2.13ln LRL (Clarke 1986)
"138036small_ML_Clar1986"=list(taxon_name="Gonatus",
taxon_aphia_id=138036,
equation=function(...)tibble(allometric_value=12.82+19.02*...),
inputs=tibble(property="lower rostral length",
units="mm"),
return_property="mantle length",
return_units="mm",
notes="Noted by Xavier & Cherel: This equation is better for small beaks/specimens",
reference=refs$Clar1986),
"138036small_WW_Clar1986"=list(taxon_name="Gonatus",
taxon_aphia_id=138036,
equation=function(...)tibble(allometric_value=exp(0.086+2.13*log(...))),
inputs=tibble(property="lower rostral length",
units="mm"),
return_property="wet weight",
return_units="g",
notes="Noted by Xavier & Cherel: This equation is better for small beaks/specimens",
reference=refs$Clar1986),
## Histioteuthis bonnellii corpuscula (valid name Histioteuthis bonnellii)
## ML=17.1+8.99LRL (n=19) (Clarke 1986)
"140111_ML_Clar1986"=list(taxon_name="Histioteuthis bonnellii",
taxon_aphia_id=140111,
equation=function(...)tibble(allometric_value=17.1+8.99*...),
inputs=tibble(property="lower rostral length",
units="mm"),
return_property="mantle length",
return_units="mm",
reliability=tibble(type="N",value=19),
reference=refs$Clar1986),
## ML=1.82+15.24LRL; ln M= 1.16+2.70lnLRL (n=21 for ML and M, using total
## weight of preserved specimens) (Lu & Ickeringill 2002)
"140111_ML_LuIc2002"=list(taxon_name="Histioteuthis bonnellii",
taxon_aphia_id=140111,
equation=function(...)tibble(allometric_value=1.82+15.24*...),
inputs=tibble(property="lower rostral length",
units="mm"),
return_property="mantle length",
return_units="mm",
reliability=tribble(~type,~value,
"N",21,
"R^2",0.93),
reference=refs$LuIc2002),
"140111_WW_LuIc2002"=list(taxon_name="Histioteuthis bonnellii",
taxon_aphia_id=140111,
equation=function(...)tibble(allometric_value=exp(1.16+2.70*log(...))),
inputs=tibble(property="lower rostral length",
units="mm"),
return_property="wet weight",
return_units="g",
reliability=tribble(~type,~value,
"N",21,
"R^2",0.86),
notes="Noted by Lu & Ickeringill: used total weight of preserved specimens",
reference=refs$LuIc2002),
## Histioteuthis macrohista
## ML=2.36+14.46LRL; ln M= 1.16+2.72lnLRL (n=8 for ML and for M, using total
## weight of preserved specimens) (Lu & Ickeringill 2002)
"341870_ML_LuIc2002"=list(taxon_name="Histioteuthis macrohista",
taxon_aphia_id=341870,
equation=function(...)tibble(allometric_value=2.36+14.46*...),
inputs=tibble(property="lower rostral length",
units="mm"),
return_property="mantle length",
return_units="mm",
reliability=tribble(~type,~value,
"N",8,
"R^2",0.96),
reference=refs$LuIc2002),
"341870_WW_LuIc2002"=list(taxon_name="Histioteuthis macrohista",
taxon_aphia_id=341870,
equation=function(...)tibble(allometric_value=exp(1.16+2.72*log(...))),
inputs=tibble(property="lower rostral length",
units="mm"),
return_property="wet weight",
return_units="g",
reliability=tribble(~type,~value,
"N",8,
"R^2",0.96),
notes="Noted by Lu & Ickeringill: used total weight of preserved specimens",
reference=refs$LuIc2002),
## Histioteuthis miranda
## ML=-7.0+25.82LRL ; ln M=1.783+2.44ln LRL (n=27 for ML, n=14 for M) (Clarke
## 1986)
"341871_ML_Clar1986"=list(taxon_name="Histioteuthis miranda",
taxon_aphia_id=341871,
equation=function(...)tibble(allometric_value=-7.0+25.82*...),
inputs=tibble(property="lower rostral length",
units="mm"),
return_property="mantle length",
return_units="mm",
reliability=tibble(type="N",value=27),
reference=refs$Clar1986),
"341871_WW_Clar1986"=list(taxon_name="Histioteuthis miranda",
taxon_aphia_id=341871,
equation=function(...)tibble(allometric_value=exp(1.783+2.44*log(...))),
inputs=tibble(property="lower rostral length",
units="mm"),
return_property="wet weight",
return_units="g",
reliability=tibble(type="N",value=14),
reference=refs$Clar1986),
## ML=-26.51+34.21LRL; ln M= 0.86+3.04lnLRL (n=31 for ML, n=22 for M, using
## total weight of preserved specimens) (Lu & Ickeringill 2002)
"341871_ML_LuIc2002"=list(taxon_name="Histioteuthis miranda",
taxon_aphia_id=341871,
equation=function(...)tibble(allometric_value=-26.51+34.21*...),
inputs=tibble(property="lower rostral length",
units="mm"),
return_property="mantle length",
return_units="mm",
reliability=tribble(~type,~value,
"N",31,
"R^2",0.86),
reference=refs$LuIc2002),
"341871_WW_LuIc2002"=list(taxon_name="Histioteuthis miranda",
taxon_aphia_id=341871,
equation=function(...)tibble(allometric_value=exp(0.86+3.04*log(...))),
inputs=tibble(property="lower rostral length",
units="mm"),
return_property="wet weight",
return_units="g",
reliability=tribble(~type,~value,
"N",22,
"R^2",0.95),
notes="Noted by Lu & Ickeringill: used total weight of preserved specimens",
reference=refs$LuIc2002),
## Histioteuthis atlantica
## ML=-10.42+25.66LRL; ln M= 1.49+2.45lnLRL (n=21 for ML, n=19 for M, using
## total weight of preserved specimens) (Lu & Ickeringill 2002)
"341864_ML_LuIc2002"=list(taxon_name="Histioteuthis atlantica",
taxon_aphia_id=341864,
equation=function(...)tibble(allometric_value=-10.42+25.66*...),
inputs=tibble(property="lower rostral length",
units="mm"),
return_property="mantle length",
return_units="mm",
reliability=tribble(~type,~value,
"N",21,
"R^2",0.89),
reference=refs$LuIc2002),
"341864_WW_LuIc2002"=list(taxon_name="Histioteuthis atlantica",
taxon_aphia_id=341864,
equation=function(...)tibble(allometric_value=exp(1.49+2.45*log(...))),
inputs=tibble(property="lower rostral length",
units="mm"),
return_property="wet weight",
return_units="g",
reliability=tribble(~type,~value,
"N",19,
"R^2",0.91),
notes="Noted by Lu & Ickeringill: used total weight of preserved specimens",
reference=refs$LuIc2002),
## Histioteuthis eltaninae
## ML=-3.65+24.48LRL; ln M= 0.33+3.11lnLRL (n=6 for ML, n=5 for M, using total
## weight of preserved specimens) (Lu & Ickeringill 2002)
"341867_ML_LuIc2002"=list(taxon_name="Histioteuthis eltaninae",
taxon_aphia_id=341867,
equation=function(...)tibble(allometric_value=-3.65+24.48*...),
inputs=tibble(property="lower rostral length",
units="mm"),
return_property="mantle length",
return_units="mm",
reliability=tribble(~type,~value,
"N",6,
"R^2",0.99),
notes="Noted by Lu & Ickeringill: no mature specimens examined.",
reference=refs$LuIc2002),
"341867_WW_LuIc2002"=list(taxon_name="Histioteuthis eltaninae",
taxon_aphia_id=341867,
equation=function(...)tibble(allometric_value=exp(0.33+3.11*log(...))),
inputs=tibble(property="lower rostral length",
units="mm"),
return_property="wet weight",
return_units="g",
reliability=tribble(~type,~value,
"N",5,
"R^2",0.79),
notes="Noted by Lu & Ickeringill: no mature specimens examined. Used total weight of preserved specimens",
reference=refs$LuIc2002),
## Lepidoteuthis grimaldii
## ML=36.2LRL ; ln M=-0.17+3.0ln LRL (British Antarctic Survey, unpublished data)
"140193_ML_BASUnpub"=list(taxon_name="Lepidoteuthis grimaldii",
taxon_aphia_id=140193,
equation=function(...)tibble(allometric_value=36.2*...),
inputs=tibble(property="lower rostral length",
units="mm"),
return_property="mantle length",
return_units="mm",
reference=refs$BASUnpub),
"140193_WW_BASUnpub"=list(taxon_name="Lepidoteuthis grimaldii",
taxon_aphia_id=140193,
equation=function(...)tibble(allometric_value=exp(-0.17+3.0*log(...))),
inputs=tibble(property="lower rostral length",
units="mm"),
return_property="wet weight",
return_units="g",
reference=refs$BASUnpub),
## ML=-10.60+50.57LRL (n=2, using total weight of preserved specimens) (Lu & Ickeringill
## 2002) but this relationship is obviously not strong
"140193_ML_LuIc2002"=list(taxon_name="Lepidoteuthis grimaldii",
taxon_aphia_id=140193,
equation=function(...)tibble(allometric_value=-10.60+50.57*...),
inputs=tibble(property="lower rostral length",
units="mm"),
return_property="mantle length",
return_units="mm",
reliability=tribble(~type,~value,
"N",2,
"R^2",1.0),
reference=refs$LuIc2002),
## Loligo gahi (accepted name Doryteuthis (Amerigo) gahi)
## ln ML= 4.23+1.01lnLRL ; ln M=2.25+2.39lnLRL (n=446) (British Antarctic Survey, unpublished data)
"341880_ML_HatfUnpub"=list(taxon_name="Loligo gahi",
taxon_aphia_id=341880,
equation=function(...)tibble(allometric_value=exp(4.23+1.01*log(...))),
inputs=tibble(property="lower rostral length",
units="mm"),
return_property="mantle length",
return_units="mm",
reliability=tibble(type="N",value=446),
reference=refs$HatfPersComm),
"341880_WW_HatfUnpub"=list(taxon_name="Loligo gahi",
taxon_aphia_id=341880,
equation=function(...)tibble(allometric_value=exp(2.25+2.39*log(...))),
inputs=tibble(property="lower rostral length",
units="mm"),
return_property="wet weight",
return_units="g",
reliability=tibble(type="N",value=446),
reference=refs$HatfPersComm),
## Lycoteuthis lorigera
## ML=-13.04+34.56LRL; ln M= 0.32+3.00lnLRL (n=45 for ML and M, using total weight
## of preserved specimens) (Lu & Ickeringill 2002)
"342361_ML_LuIc2002"=list(taxon_name="Lycoteuthis lorigera",
taxon_aphia_id=342361,
equation=function(...)tibble(allometric_value=-13.04+34.56*...),
inputs=tibble(property="lower rostral length",
units="mm"),
return_property="mantle length",
return_units="mm",
reliability=tribble(~type,~value,
"N",45,
"R^2",0.92),
reference=refs$LuIc2002),
"342361_WW_LuIc2002"=list(taxon_name="Lycoteuthis lorigera",
taxon_aphia_id=342361,
equation=function(...)tibble(allometric_value=exp(0.32+3.00*log(...))),
inputs=tibble(property="lower rostral length",
units="mm"),
return_property="wet weight",
return_units="g",
reliability=tribble(~type,~value,
"N",45,
"R^2",0.95),
notes="Noted by Lu & Ickeringill: used total weight of preserved specimens",
reference=refs$LuIc2002),
## Mastigoteuthis psychrophila
## ML=94.424+6.203LRL ; log M=0.701+1.779logLRL (n=19 for ML and M) (British
## Antarctic Survey, unpublished data)
"341904_ML_BASUnpub"=list(taxon_name="Mastigoteuthis psychrophila",
taxon_aphia_id=341904,
equation=function(...)tibble(allometric_value=94.424+6.203*...),
inputs=tibble(property="lower rostral length",
units="mm"),
return_property="mantle length",
return_units="mm",
reliability=tibble(type="N",value=19),
reference=refs$BASUnpub),
"341904_WW_BASUnpub"=list(taxon_name="Mastigoteuthis psychrophila",
taxon_aphia_id=341904,
equation=function(...)tibble(allometric_value=exp(0.701+1.779*log(...))),
inputs=tibble(property="lower rostral length",
units="mm"),
return_property="wet weight",
return_units="g",
reliability=tibble(type="N",value=19),
reference=refs$BASUnpub),
## Alluroteuthis antarcticus
## ML=-4.301+34.99LRL ; ln M=1.229+2.944ln LRL (n=22) (Piatkowski et al. 2001).
"325302_ML_Piat2001"=list(taxon_name="Alluroteuthis antarcticus",
taxon_aphia_id=325302,
equation=function(...)tibble(allometric_value=-4.301+34.99*...),
inputs=tibble(property="lower rostral length",
units="mm"),
return_property="mantle length",
return_units="mm",
reliability=tibble(type="N",value=22),
reference=refs$Piat2001),
"325302_WW_Piat2001"=list(taxon_name="Alluroteuthis antarcticus",
taxon_aphia_id=325302,
equation=function(...)tibble(allometric_value=exp(1.229+2.944*log(...))),
inputs=tibble(property="lower rostral length",
units="mm"),
return_property="wet weight",
return_units="g",
reliability=tibble(type="N",value=22),
reference=refs$Piat2001),
## Taningia danae
## ML=-556.9+75.22LRL; ln M=-0.874+3.42ln LRL (n=15 for ML and M) (Clarke 1986)
"140609_ML_Clark1986"=list(taxon_name="Taningia danae",
taxon_aphia_id=140609,
equation=function(...)tibble(allometric_value=-556.9+75.22*...),
inputs=tibble(property="lower rostral length",
units="mm"),
return_property="mantle length",
return_units="mm",
reliability=tibble(type="N",value=15),
reference=refs$Clar1986),
"140609_WW_Clark1986"=list(taxon_name="Taningia danae",
taxon_aphia_id=140609,
equation=function(...)tibble(allometric_value=exp(-0.874+3.42*log(...))),
inputs=tibble(property="lower rostral length",
units="mm"),
return_property="wet weight",
return_units="g",
reliability=tibble(type="N",value=15),
reference=refs$Clar1986),
## Octopoteuthis sp.
## ML=-0.4+17.33LRL; ln M=0.166+2.31ln LRL (n=30 for ML, n=22 M) (Clarke 1986)
"138271_ML_Clark1986"=list(taxon_name="Octopoteuthis",
taxon_aphia_id=138271,
equation=function(...)tibble(allometric_value=-0.4+17.33*...),
inputs=tibble(property="lower rostral length",
units="mm"),
return_property="mantle length",
return_units="mm",
reliability=tibble(type="N",value=30),
reference=refs$Clar1986),
"138271_WW_Clark1986"=list(taxon_name="Octopoteuthis",
taxon_aphia_id=138271,
equation=function(...)tibble(allometric_value=exp(0.166+2.31*log(...))),
inputs=tibble(property="lower rostral length",
units="mm"),
return_property="wet weight",
return_units="g",
reliability=tibble(type="N",value=22),
reference=refs$Clar1986),
## Martialia hyadesi
## ML= 102.0+29.47LRL ; ln M=2.405+2.012 ln LRL (n=67 for ML and M) (Rodhouse
## & Yeatman 1990)
"325305_ML_RoYe1990"=list(taxon_name="Martialia hyadesi",
taxon_aphia_id=325305,
equation=function(...)tibble(allometric_value=102.0+29.47*...),
inputs=tibble(property="lower rostral length",
units="mm"),
return_property="mantle length",
return_units="mm",
reliability=tibble(type="N",value=67),
reference=refs$RoYe1990),
"325305_WW_RoYe1990"=list(taxon_name="Martialia hyadesi",
taxon_aphia_id=325305,
equation=function(...)tibble(allometric_value=exp(2.405+2.012*log(...))),
inputs=tibble(property="lower rostral length",
units="mm"),
return_property="wet weight",
return_units="g",
reliability=tibble(type="N",value=67),
reference=refs$RoYe1990),
## Illex argentinus
## ML=-12.228+55.187LRL ; M=2.2750 LRL3.1210 (n=131for ML and M) (Santos & Haimovici 2000)
"342064_ML_SaHa2000"=list(taxon_name="Illex argentinus",
taxon_aphia_id=342064,
equation=function(...)tibble(allometric_value=-12.228+55.187*...),
inputs=tibble(property="lower rostral length",units="mm",sample_minimum=0.4,sample_maximum=6.6),
return_property="mantle length",
return_units="mm",
reliability=tribble(~type,~value,
"N",131,
"R^2",0.989^2),
reference=refs$SaHa2000),
"342064_WW_SaHa2000"=list(taxon_name="Illex argentinus",
taxon_aphia_id=342064,
equation=function(...)tibble(allometric_value=2.2750*(...^3.1210)),
inputs=tibble(property="lower rostral length",units="mm",sample_minimum=0.4,sample_maximum=6.6),
return_property="wet weight",
return_units="g",
reliability=tribble(~type,~value,
"N",131,
"R^2",0.996^2),
reference=refs$SaHa2000),
## Todarodes sp.
## ML=-11.3+41.36LRL ; ln M=0.783+2.83 ln LRL (Clarke 1986)
"138281_ML_Clar1986"=list(taxon_name="Todarodes",
taxon_aphia_id=138281,
equation=function(...)tibble(allometric_value=-11.3+41.36*...),
inputs=tibble(property="lower rostral length",
units="mm"),
return_property="mantle length",
return_units="mm",
reference=refs$Clar1986),
"138281_WW_Clar1986"=list(taxon_name="Todarodes",
taxon_aphia_id=138281,
equation=function(...)tibble(allometric_value=exp(0.783+2.83*log(...))),
inputs=tibble(property="lower rostral length",
units="mm"),
return_property="wet weight",
return_units="g",
reference=refs$Clar1986),
## Kondakovia longimana
## ML=-22.348+37.318LRL ; M=0.713LRL3.152 (n=13 for ML; n=22 for M) (Brown &
## Klages 1987)
"325308_ML_BrKl1987"=list(taxon_name="Kondakovia longimana",
taxon_aphia_id=325308,
equation=function(...)tibble(allometric_value=-22.348+37.318*...),
inputs=tibble(property="lower rostral length",
units="mm"),
return_property="mantle length",
return_units="mm",
reliability=tribble(~type,~value,
"N",13,
"R^2",0.95),
reference=refs$BrKl1987),
"325308_WW_BrKl1987"=list(taxon_name="Kondakovia longimana",
taxon_aphia_id=325308,
equation=function(...)tibble(allometric_value=0.713*(...^3.152)),
inputs=tibble(property="lower rostral length",
units="mm"),
return_property="wet weight",
return_units="g",
reliability=tribble(~type,~value,
"N",22,
"R^2",0.99),
reference=refs$BrKl1987),
## Moroteuthis ingens (valid name Onykia ingens)
## (Jackson 1995):
## Males: ML= 98.59+24.40LRL (n=82); females: ML=-27.84+44.63LRL (n=68)
"410381M_ML_Jack1995"=list(taxon_name="Onykia ingens",
taxon_aphia_id=410381,
equation=function(...)tibble(allometric_value=98.59+24.40*...),
inputs=tibble(property="lower rostral length",
units="mm"),
return_property="mantle length",
return_units="mm",
reliability=tibble(type="N",value=82),
notes="Applies to male animals",
reference=refs$Jack1995),
"410381F_ML_Jack1995"=list(taxon_name="Onykia ingens",
taxon_aphia_id=410381,
equation=function(...)tibble(allometric_value=-27.84+44.63*...),
inputs=tibble(property="lower rostral length",
units="mm"),
return_property="mantle length",
return_units="mm",
reliability=tibble(type="N",value=68),
notes="Applies to female animals",
reference=refs$Jack1995),
## Males: logM= 1.22+1.80logLRL (n=82); females: logM= 0.15+3.25logLRL (n=68)
"410381M_WW_Jack1995"=list(taxon_name="Onykia ingens",
taxon_aphia_id=410381,
equation=function(...)tibble(allometric_value=exp(1.22+1.80*log(...))),
inputs=tibble(property="lower rostral length",
units="mm"),
return_property="wet weight",
return_units="g",
reliability=tibble(type="N",value=82),
notes="Applies to male animals",
reference=refs$Jack1995),
"410381F_WW_Jack1995"=list(taxon_name="Onykia ingens",
taxon_aphia_id=410381,
equation=function(...)tibble(allometric_value=exp(0.15+3.25*log(...))),
inputs=tibble(property="lower rostral length",
units="mm"),
return_property="wet weight",
return_units="g",
reliability=tibble(type="N",value=68),
notes="Applies to female animals",
reference=refs$Jack1995),
## Moroteuthis knipovitchi (valid name is Filippovia knipovitchi)
## ML=-105.707+62.369LRL; ln M=-0.881+3.798lnLRL (n=7 for ML, n=5 for M) (Cherel,
## unpublished data)
"325310_ML_CherUnpub"=list(taxon_name="Moroteuthis knipovitchi",
taxon_aphia_id=325310,
equation=function(...)tibble(allometric_value=-105.707+62.369*...),
inputs=tibble(property="lower rostral length",
units="mm"),
return_property="mantle length",
return_units="mm",
reliability=tibble(type="N",value=7),
reference=refs$CherUnpub),
"325310_WW_CherUnpub"=list(taxon_name="Moroteuthis knipovitchi",
taxon_aphia_id=325310,
equation=function(...)tibble(allometric_value=exp(-0.881+3.798*log(...))),
inputs=tibble(property="lower rostral length",
units="mm"),
return_property="wet weight",
return_units="g",
reliability=tibble(type="N",value=5),
reference=refs$CherUnpub),
## Moroteuthis robsoni (valid name Onykia robsoni)
## ML=-652.91+151.03LRL; ln M= -9.15+8.07lnLRL (n=8 for ML, n=6 for M, using total
## weight of preserved specimens) (Lu & Ickeringill 2002)
"342256_ML_LuIc2002"=list(taxon_name="Moroteuthis robsoni",
taxon_aphia_id=342256,
equation=function(...)tibble(allometric_value=-652.91+151.03*...),
inputs=tibble(property="lower rostral length",
units="mm"),
return_property="mantle length",
return_units="mm",
reliability=tribble(~type,~value,
"N",8,
"R^2",0.87),
reference=refs$LuIc2002),
"342256_WW_LuIc2002"=list(taxon_name="Moroteuthis robsoni",
taxon_aphia_id=342256,
equation=function(...)tibble(allometric_value=exp(-9.15+8.07*log(...))),
inputs=tibble(property="lower rostral length",
units="mm"),
return_property="wet weight",
return_units="g",
reliability=tribble(~type,~value,
"N",6,
"R^2",0.94),
notes="Noted by Lu & Ickeringill: used total weight of preserved specimens",
reference=refs$LuIc2002),
## Onychoteuthis banksii
## ML=2.31+32.75LRL; ln M= -0.04+2.80lnLRL (n=10 for ML and M, using total weight
## of preserved specimens) (Lu & Ickeringill 2002)
"140649_ML_LuIc2002"=list(taxon_name="Onychoteuthis banksii",
taxon_aphia_id=140649,
equation=function(...)tibble(allometric_value=2.31+32.75*...),
inputs=tibble(property="lower rostral length",
units="mm"),
return_property="mantle length",
return_units="mm",
reliability=tribble(~type,~value,
"N",10,
"R^2",0.86),
reference=refs$LuIc2002),
"140649_WW_LuIc2002"=list(taxon_name="Onychoteuthis banksii",
taxon_aphia_id=140649,
equation=function(...)tibble(allometric_value=exp(-0.04+2.80*log(...))),
inputs=tibble(property="lower rostral length",
units="mm"),
return_property="wet weight",
return_units="g",
reliability=tribble(~type,~value,
"N",10,
"R^2",0.94),
notes="Noted by Lu & Ickeringill: used total weight of preserved specimens",
reference=refs$LuIc2002),
## Pholidoteuthis massyae
## ML=11.3+41.09LRL ; ln M=0.976+2.83ln LRL (n=12 for ML, n=15 for M) (Clarke 1986)
"410388_ML_Clar1986"=list(taxon_name="Pholidoteuthis massyae",
taxon_aphia_id=410388,
equation=function(...)tibble(allometric_value=11.3+41.09*...),
inputs=tibble(property="lower rostral length",
units="mm"),
return_property="mantle length",
return_units="mm",
reliability=tibble(type="N",value=12),
reference=refs$Clar1986),
"410388_WW_Clar1986"=list(taxon_name="Pholidoteuthis massyae",
taxon_aphia_id=410388,
equation=function(...)tibble(allometric_value=exp(0.976+2.83*log(...))),
inputs=tibble(property="lower rostral length",
units="mm"),
return_property="wet weight",
return_units="g",
reliability=tibble(type="N",value=15),
reference=refs$Clar1986),
## Psychroteuthis glacialis
## ML= 50.6895LRL-8.6008LRL2+1.0823LRL3-8.7019 (n=211, R^2=0.93) ; ln M = 0.3422+2.1380
## lnLRL+0.2214lnLRL3 (n=211,R^2=0.95) (Groger et al. 2000)
## Groger J, Piatkowski U, Heinemann H (2000) Beak length analysis of the Southern Ocean squid Psychroteuthis glacialis (Cephalopoda: Psychroteuthidae) and its use for size and biomass estimation. Polar Biology 23:70-74. doi:10.1007/s003000050009
"325312_ML_Grog2000"=list(taxon_name="Psychroteuthis glacialis",
taxon_aphia_id=325312,
equation=function(...)tibble(allometric_value=50.6895*...-8.6008*(...^2)+1.0823*(...^3)-8.7019),
inputs=tibble(property="lower rostral length",units="mm",sample_minimum=0.3,sample_maximum=8.0),
return_property="mantle length",
return_units="mm",
reliability=tribble(~type,~value,
"N",211,
"R^2",0.93),
reference=refs$Grog2000),
"325312_WW_Grog2000"=list(taxon_name="Psychroteuthis glacialis",
taxon_aphia_id=325312,
equation=function(...)tibble(allometric_value=exp(0.3422+2.1380*log(...)+0.2214*(log(...)^3)^3)),
inputs=tibble(property="lower rostral length",units="mm",sample_minimum=0.3,sample_maximum=8.0),
return_property="wet weight",
return_units="g",
reliability=tribble(~type,~value,
"N",211,
"R^2",0.95),
reference=refs$Grog2000),
## Haliphron atlanticus
## Ln M=2.5+1.45ln LRL (British Antarctic Survey, unpublished data)
"341781_WW_BASUnpub"=list(taxon_name="Haliphron atlanticus",
taxon_aphia_id=341781,
equation=function(...)tibble(allometric_value=exp(2.5+1.45*log(...))),
inputs=tibble(property="lower rostral length",
units="mm"),
return_property="wet weight",
return_units="g",
reference=refs$BASUnpub),
## Pareledone turqueti
## ML=17.70487+ 13.32812LHL; LnM =0.689269+2.542938LnLHL (n=7 for ML, n=23 for
## M), where LHL= lower hood length (in mm) (Collins, unpublished data)
"239393_ML_CollUnpub"=list(taxon_name="Pareledone turqueti",
taxon_aphia_id=239393,
equation=function(...)tibble(allometric_value=17.70487+13.32812*...),
inputs=tibble(property="lower hood length",
units="mm"),
return_property="mantle length",
return_units="mm",
reliability=tribble(~type,~value,
"N",7),
reference=refs$CollUnpub),
"239393_WW_CollUnpub"=list(taxon_name="Pareledone turqueti",
taxon_aphia_id=239393,
equation=function(...)tibble(allometric_value=exp(0.689269+2.542938*log(...))),
inputs=tibble(property="lower hood length",
units="mm"),
return_property="wet weight",
return_units="g",
reliability=tribble(~type,~value,
"N",23),
reference=refs$CollUnpub),
## Adelieledone polymorpha
## ML= -7,426229508+25,16393443LHL; Ln M =1,077552+3,200449LnLHL
## (n=3 for ML, n= 39 for M) (Collins, unpublished data)
"325319_ML_CollUnpub"=list(taxon_name="Adelieledone polymorpha",
taxon_aphia_id=325319,
equation=function(...)tibble(allometric_value=-7.426229508+25.16393443*...),
inputs=tibble(property="lower hood length",
units="mm"),
return_property="mantle length",
return_units="mm",
reliability=tribble(~type,~value,
"N",3),
reference=refs$CollUnpub),
"325319_WW_CollUnpub"=list(taxon_name="Adelieledone polymorpha",
taxon_aphia_id=325319,
equation=function(...)tibble(allometric_value=exp(1.077552+3.200449*log(...))),
inputs=tibble(property="lower hood length",
units="mm"),
return_property="wet weight",
return_units="g",
reliability=tribble(~type,~value,
"N",39),
reference=refs$CollUnpub),
## Benthoctopus thielei (valid name is Muusoctopus thielei)
## ML = 7.398+12.569LHL; lnM= 0.471+2.706lnLHL (n=48 for ML and M) (Cherel,
## unpublished data)
"341931_ML_CherUnpub"=list(taxon_name="Benthoctopus thielei",
taxon_aphia_id=341931,
equation=function(...)tibble(allometric_value=7.398+12.569*...),
inputs=tibble(property="lower hood length",
units="mm"),
return_property="mantle length",
return_units="mm",
reliability=tribble(~type,~value,
"N",48),
reference=refs$CherUnpub),
"341931_WW_CherUnpub"=list(taxon_name="Benthoctopus thielei",
taxon_aphia_id=341931,
equation=function(...)tibble(allometric_value=exp(0.471+2.706*log(...))),
inputs=tibble(property="lower hood length",
units="mm"),
return_property="wet weight",
return_units="g",
reliability=tribble(~type,~value,
"N",48),
reference=refs$CherUnpub),
## Graneledone gonzalezi
## ML = 5.047+13.004LHL; lnM= 0.288+2.967lnLHL (n=54 for ML and M) (Cherel,
## unpublished data)
"342224_ML_CherUnpub"=list(taxon_name="Graneledone gonzalezi",
taxon_aphia_id=342224,
equation=function(...)tibble(allometric_value=5.047+13.004*...),
inputs=tibble(property="lower hood length",
units="mm"),
return_property="mantle length",
return_units="mm",
reliability=tribble(~type,~value,
"N",54),
reference=refs$CherUnpub),
"342224_WW_CherUnpub"=list(taxon_name="Graneledone gonzalezi",
taxon_aphia_id=342224,
equation=function(...)tibble(allometric_value=exp(0.288+2.967*log(...))),
inputs=tibble(property="lower hood length",
units="mm"),
return_property="wet weight",
return_units="g",
reliability=tribble(~type,~value,
"N",54),
reference=refs$CherUnpub),
## Opisthoteuthis sp.
## ML=-26.0047+12.4858CL; logM=0.5893+0.2413CL (n= 13 for ML, n=9 for M) (Smale
## et al. 1993) where CL = Crest length (in mm)
## included in equations_Smal1993.R
stop("unrecognized equation ID: ",id))
}
R Package Documentation
Browse R Packages
We want your feedback!
Note that we can't provide technical support on individual packages. You should contact the package authors for that.
Embedding an R snippet on your website
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.