Смертность: различия между версиями
Patarakin (обсуждение | вклад) |
Patarakin (обсуждение | вклад) |
||
Строка 15: | Строка 15: | ||
== NetLogo == | == NetLogo == | ||
* https://modelingcommons.org/browse/one_model/6305#model_tabs_browse_nlw | * https://modelingcommons.org/browse/one_model/6305#model_tabs_browse_nlw | ||
<syntaxhighlight lang="netlogo"> | |||
to check-death | |||
if ticks = 0 [set deathrate-hist [0 0 0 0 0 0 0 0 0 0]] | |||
set alpha (0.085 * 0.5 / (exp(0.085 * life-expectancy) - 1)) | |||
ask turtles [ | |||
;Mapping life expectancy to probability of death through the 50% point on the Gompertz cummulative density function | |||
;if random 1000 < ( 1 - exp(-(0.693) * (1 - exp(0.085 * age)) / (1 - exp(0.085 * life-expectancy)))) * 1000 [ | |||
;if random 1000 < ( 1 - ( exp ( ( 1 - exp(0.085 * age)) / ( 1 - exp(0.085 * life-expectancy)) * -0.693))) * 1000 [ | |||
if random 1000 < (alpha * exp(0.085 * age)) * 1000 [ | |||
set ndeaths ndeaths + 1 | |||
die | |||
</syntaxhighlight> | |||
== StarLogo Nova == | == StarLogo Nova == |
Версия 14:03, 2 мая 2024
Описание | Сме́ртность — свойство живых организмов быть подверженными смерти. |
---|---|
Область знаний | Биология |
Авторы | |
Поясняющее видео | |
Близкие понятия | |
Среды и средства для освоения понятия | StarLogo Nova, Netlogo |
Закон смертности Гомпертца — Мейкхама (иногда просто Закон Гомпертца, Распределение Гомпертца) — статистическое распределение, которое описывает смертность человека и большинства многоплодных животных. Согласно закону Гомпертца — Мейкхама, смертность является суммой независимого от возраста компонента (члена Мейкхама) и компонента, зависимого от возраста (функция Гомпертца), который экспоненциально возрастает с возрастом и описывает старение организма. В защищённых средах, где внешние причины смерти отсутствуют (в лабораторных условиях, в зоопарках или для людей в развитых странах) независимый от возраста компонент часто становится малым, и формула упрощается до функции Гомпертца.
Согласно закону Гомпертца — Мейкхама, вероятность смерти за фиксированный короткий промежуток времени после достижения возраста x составляет:
- [math]\displaystyle{ p=a+b\exp(cx) }[/math],
где x — возраст, а p — относительная вероятность смерти за определённый промежуток времени, a, b и c — коэффициенты.
NetLogo
to check-death
if ticks = 0 [set deathrate-hist [0 0 0 0 0 0 0 0 0 0]]
set alpha (0.085 * 0.5 / (exp(0.085 * life-expectancy) - 1))
ask turtles [
;Mapping life expectancy to probability of death through the 50% point on the Gompertz cummulative density function
;if random 1000 < ( 1 - exp(-(0.693) * (1 - exp(0.085 * age)) / (1 - exp(0.085 * life-expectancy)))) * 1000 [
;if random 1000 < ( 1 - ( exp ( ( 1 - exp(0.085 * age)) / ( 1 - exp(0.085 * life-expectancy)) * -0.693))) * 1000 [
if random 1000 < (alpha * exp(0.085 * age)) * 1000 [
set ndeaths ndeaths + 1
die