Wolfram Research

Human Cell Counts

Dataset of total number of cells in organs/systems in adult human body

(4 columns, 54 rows)

Examples

Basic Examples

Retrieve the default content:

In[1]:=
ResourceData["Human Cell Counts"]
Out[1]=

Visualization

Compare the cell number in different cell types:

In[2]:=
With[{data = ResourceData["Human Cell Counts"][
    SortBy["MeanTotalCellNumber"], {"CellType", "MeanTotalCellNumber"}]}, BarChart[data[All, "MeanTotalCellNumber"], ChartLabels -> Placed[Normal@data[All, "CellType"], Axis, Rotate[#, 90 Degree] &],
   ScalingFunctions -> "Log", PlotTheme -> "Business"]]
Out[2]=

Compare total cell number in internal organs:

In[3]:=
organN = KeyTake[
  ResourceData["Human Cell Counts"][
   GroupBy[Interpreter["AnatomicalStructure"][#OrganSystem] &], Total,
    "MeanTotalCellNumber"], EntityList@EntityClass["AnatomicalStructure", "InternalOrgans"]]
Out[3]=
In[4]:=
ImageCollage[
 Rule[organN[#], #["TypicalMorphology"]] & /@ Normal@Keys[organN], Background -> White]
Out[4]=

Wolfram Research, "Human Cell Counts" from the Wolfram Data Repository (2017) https://doi.org/10.24097/wolfram.85496.data

Data Resource History

Source Metadata

Data Downloads

Publisher Information