Entity
EntityValue
EntityClass
GeoRegionValuePlot

Life Sciences

Distribution of Endangered Mammals

Analyze habitats of endangered mammalian species and compare with anthropogenic biomes

Open in Cloud
Download Notebook

Find endangered mammal species:

In[1]:=

endangeredmammal=EntityClass"TaxonomicSpecies",

phyletic groups



mammal

SPECIES PHYLETIC GROUP

conservation status



Endangered

SPECIES CONSERVATION STATUS

;

Show three of the species:

In[2]:=

Take[EntityList[endangeredmammal],3]

Out[2]=



golden-capped fruit bat

giant panda

Iranian jerboa



Color countries by the number of endangered mammal species found:

In[3]:=

GeoRegionValuePlot[Tally[Flatten[EntityValue[endangeredmammal,"ObservationCountries"]]]]

Out[3]=

Compare habitats of endangered mammals. Illustrate the terrestrial biomes describing the habitats of organisms:

In[4]:=

biomes=

chaparral biome

BIOME



desert or dune biome

BIOME



forest biome

BIOME



mountain biome

BIOME



rainforest biome

BIOME



savanna or grassland biome

BIOME



taiga biome

BIOME



tundra biome

BIOME



scrub forest biome

BIOME



;

In[5]:=

Legended[Image[GeoGraphics[{GeoStyling[#〚2〛],EntityValue[#〚1〛,"Polygon"]}&/@biomes]],SwatchLegend[biomes〚All,2〛,biomes〚All,1〛]]

Out[5]=

Count the number of endangered mammal species in each terrestrial biome and plot them on the map:

In[6]:=

Withcount=CountsFlattenDeleteMissing@EntityValueendangeredmammal,

terrestrial biomes

,Row[{PieChart[KeyValueMap[Labeled[#2,#1,"RadialCallout"]&,count],PlotRangeFull,ChartStyle(Keys[count]/.biomes)],GeoRegionValuePlot[count]}]

Out[6]=

In addition to species habitats, use the Anthropogenic Biome dataset from the Wolfram Data Repository to illustrate anthropogenic biomes of the world:

In[7]:=

anthrobiome=ResourceData["Anthropogenic Biome"][Select[!MissingQ[#Polygon[DateObject[{2006}]]]&]];

Map anthropogenic biomes circa 2006:

In[8]:=

Legended[Image[GeoGraphics[anthrobiome[All,{#Color,#Polygon[DateObject[{2006}]]}&],GeoRange"World"]],SwatchLegend[Normal@anthrobiome〚All,4,1〛,Normal@anthrobiome〚All,1〛]]

Out[8]=

Related Symbols

Entity
EntityValue
EntityClass
GeoRegionValuePlot

Publisher Information

Contributed by: Wolfram Staff

Wolfram Language Example Repository

Distribution of Endangered Mammals

See Also

Publisher Information