## field groupings:
species_fields <- list(
id = c("SpecCode",
"Genus",
"Species",
"FBname"),
habitat = c("Fresh",
"Brack",
"Saltwater",
"DemersPelag",
"AnaCat"),
longevity = c("LongevityWild",
"LongevityCaptive",
"Vulnerability"),
depth = c("DepthRangeShallow",
"DepthRangeDeep",
"DepthRangeComShallow",
"DepthRangeComDeep"),
morph = c("Length",
"LTypeMaxM",
"LengthFemale",
"LTypeMaxF",
"CommonLength",
"LTypeComM",
"CommonLengthF",
"LTypeComF",
"Weight",
"WeightFemale"),
fishing = c("Importance",
"PriceCateg",
"PriceReliability",
"LandingStatistics",
"Landings",
"MainCatchingMethod",
"MSeines",
"MGillnets",
"MCastnets",
"MTraps",
"MSpears",
"MTrawls",
"MDredges",
"MLiftnets",
"MHooksLines",
"MOther",
"UsedforAquaculture",
"LifeCycle",
"UsedasBait",
"Aquarium",
"GameFish"),
misc = c("Dangerous",
"Electrogenic"),
curation= c("DateEntered",
"DateModified",
"DateChecked",
"Complete",
"Entered",
"Modified",
"Expert"),
refs = c("DepthRangeRef",
"LongevityWildRef",
"LongevityCapRef",
"MaxLengthRef",
"CommonLengthRef",
"MaxWeightRef",
"ImportanceRef",
"AquacultureRef",
"BaitRef",
"AquariumRef",
"GameRef",
"DangerousRef",
"ElectroRef"))
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.