Mathematica y Anatomía

Descargar como Notebook

Mathematica incorpora los comandos AnatomyData, AnatomyPlot3D, AnatomyForm, HumanGrowthData y otros más, que incluyen una inmensa base de datos con casi cien mil entidades correspondientes a órganos, huesos, sistemas, etc. de la anatomía del cuerpo humano.

AnatomyData[]

Estas entidades se encuentran agrupadas según la siguiente clasificación:

AnatomyData["Classes"]

Por ejemplo

Length[%]
206

Gráfico de una entidad

Graficando varias de estas entidades, de acuerdo con la estructura del cuerpo humano:

Una clase de entidades

o varios sistemas de una parte del cuerpo

Datos de alguna entidad, del cerebro: masa, volumen y porcentaje de peso con respecto al cuerpo

{1375., Grams, 1300., Milliliters], 2., %]}

Datos del crecimiento de un infante menor de 35 meses

Manipulate[
 valor = HumanGrowthData[
   Association["Age" -> Quantity[edad, "Months"], "Gender" -> Sexo], 
   Dato, UnitSystem -> "Metric"]; 
 Row[{"De ", valor[[1, 1, 1]], 2, " a ", valor[[1, 1, 2]], " ", 
   valor[[2]]}], {{edad, 10, "Edad en Meses"}, 0, 35, 
  Appearance -> "Labeled"}, {{Sexo, 
   "Female"}, {"Female" -> "Femenino", 
   "Male" -> "Masculino"}}, {{Dato, "Length"}, {"Length" -> "Altura", 
   "Weight" -> "Peso"}}]

La mejor forma de conocer a profundidad los anteriores comandos es visitando la ayuda del programa y el centro de información.


Para aprender más sobre Mathematica ingrese aquí sitio de aprendizaje de Wolfram o en mi website ustamathematica.wixsite.com/basicas