Child of Simple Birth Rates

No preview image

1 collaborator

KAJ?

To je preprosti model populacijske genetike. Primerjamo dve populaciji, rdeče in modre. Vsaka izmed njih ima nastavljivo rodnost. Rdeči in modri se premikajo naokrog in reproducirajo v skladu z nastavljeno rodnostjo. Ko je zmožnost preživetja v okolju, v katerem živijo, presežena, določene osebe umrejo (vsaka oseba ima enako stopnjo smrtnosti); število prebivalstva ostaja tako ves čas približno enako. Poizkus omogoča raziskovanje porasta ali upada populacije rdečih in modrih glede na določeno rodnost enih ali drugih.

KAKO GA UPORABLJATI

Vsak prehod skozi funkcijo POŽENI predstavlja generacijo v časovnici modela.

Drsnik STEVILOPREBIVALSTVA nastavlja maksimalno število prebivalcev, ki jih okolje še lahko preživi. Model predpostavlja, da je na začetku v populaciji polovica rdečih in polovica modrih.

Drsnika RDEČI RODNOST in MODRI RODNOST nastavita povprečno število otrok, ki jih imajo modri ali rdeči v eni generaciji. Na primer: rodnost 3.4 pomeni, da bo imel vsak starš najmanj tri otroke z 40% možnostjo, da bo imel še četrtega.

Števca # MODRI in # RDEČI prikazujeta število enih ali drugih v celotni populaciji.

POŽENI gumb požene model. Graf prikazuje število rdečih in modrih v populaciji, z zeleno pa je prikazano število celotne populacije.

Gumb POŽENI EKSPERIMENT dovoljuje preizkušanje z večimi poizkusi zapored. Poizkus traja toliko generacij, kolikor je potrebno, da rdeči ali modri dokončno izumrejo glede na vrednosti drsnikov. Po vsakem izumrtju se svet počisti in prične se nov poizkus z enakimi nastavitvami kot prejšnji. Eksperiment za vsak poizkus izpiše, katera populacija je izumrla in po koliko generacijah se je to zgodilo. Na ta način se lažje in hitreje primerja variacije v številu generacij pred izumrtjem.

BODITE POZORNI

Kako različne rodnosti vplivajo na populacijsko dinamiko?

Ali populacija z višjo rodnostjo vedno začne rasti hitreje?

Ali populacija z nižjo rodnostjo vedno izumre?

PREIZKUSITE

Poizkusite pognati eksperiment z istimi nastavitvami večkrat. Ali vedno izumre ista populacija? Kako niha število generacij pred izumrtjem določene populacije?

MOŽNE SPREMEMBE MODELA

Model je spisan tako, da ima vsak član populacije, ob presežku števila prebivalstva, enako verjetnost za smrt (enako stopnjo smrtnosti). Možna nadgradnja modela bi bila, da bi bila stopnja smrtnosti višja z gostoto naseljenosti. Kako bi taka spremenljivka vplivala na rodnost in populacijsko dinamiko?

V tem modelu se populacija prilagaja maksimalnemu številu prebivalstva, ki ga okolje še lahko prenese. Kako bi se spremenila populacijska dinamika, če bi se obe spremenljivki spreminjali neodvisno?

Rdeči imajo vedno rdeče potomce in modri vedno modre. Kaj pa, če bi dovolili, da bi rdeči včasih imeli modre potomce in obratno? Kako bi se spremenila dinamika?

KAKO CITIRATI

Če ta model omenite v publikaciji, prosimo, da vključite naslednje vire za sam model kot tudi za NetLogo programsko opremo:

Wilensky, U. (1997). NetLogo Simple Birth Rates model. http://ccl.northwestern.edu/netlogo/models/SimpleBirthRates. Center for Connected Learning and Computer-Based Modeling, Northwestern University, Evanston, IL.
Wilensky, U. (1999). NetLogo. http://ccl.northwestern.edu/netlogo/. Center for Connected Learning and Computer-Based Modeling, Northwestern University, Evanston, IL.

COPYRIGHT AND LICENSE

CC BY-NC-SA 3.0

This work is licensed under the Creative Commons Attribution-NonCommercial-ShareAlike 3.0 License. To view a copy of this license, visit http://creativecommons.org/licenses/by-nc-sa/3.0/ or send a letter to Creative Commons, 559 Nathan Abbott Way, Stanford, California 94305, USA.

Commercial licenses are also available. To inquire about commercial licenses, please contact Uri Wilensky at uri@northwestern.edu.

This model was created as part of the project: CONNECTED MATHEMATICS: MAKING SENSE OF COMPLEX PHENOMENA THROUGH BUILDING OBJECT-BASED PARALLEL MODELS (OBPML). The project gratefully acknowledges the support of the National Science Foundation (Applications of Advanced Technologies Program) -- grant numbers RED #9552950 and REC #9632612.

This model was converted to NetLogo as part of the projects: PARTICIPATORY SIMULATIONS: NETWORK-BASED DESIGN FOR SYSTEMS LEARNING IN CLASSROOMS and/or INTEGRATED SIMULATION AND MODELING ENVIRONMENT. The project gratefully acknowledges the support of the National Science Foundation (REPP & ROLE programs) -- grant numbers REC #9814682 and REC-0126227. Converted from StarLogoT to NetLogo, 2001.

Comments and Questions

Please start the discussion about this model! (You'll first need to log in.)

Click to Run Model

globals
[
  red-count            ; populacija rdecih
  blue-count           ; populacija modrih
]

turtles-own
[
  fertility            ; rodnost
  fertility-remainder  ; ostanek (za decimalno piko)
]

to setup
  clear-output
  setup-experiment
end 

to setup-experiment
  cp ct
  clear-all-plots
  reset-ticks
  crt steviloPrebivalstva
  [
    setxy random-xcor random-ycor         ; postavi osebe na nakljucna mesta
    ifelse who < (steviloPrebivalstva / 2)  ; zacni z enakim stevilom rdecih in modrih
      [ set color blue ]
      [ set color red ]
    set size 2                            ; boljsa preglednost
  ]
  reset-ticks
end 

to go
  reproduce
  grim-reaper
  tick
end 

;; omogoci vec ponavljanj

to go-experiment
  go
  if red-count = 0
  [
    output-print (word "Rdeči izumrejo po " ticks " generacijah.")
    setup-experiment
  ]
  if blue-count = 0
  [
    output-print (word "Modri izumrejo po " ticks " generacijah.")
    setup-experiment
  ]
end 

to wander  ;; premikanje zelv
  rt random-float 30 - random-float 30
  fd 1
end 

to reproduce
  ask turtles
  [
    ifelse color = red
    [
      set fertility floor rdeci-rodnost
      set fertility-remainder rdeci-rodnost - (floor rdeci-rodnost)
    ]
    [
      set fertility floor modri-rodnost
      set fertility-remainder modri-rodnost - (floor modri-rodnost)
    ]
    ifelse (random-float 100) < (100 * fertility-remainder)
      [ hatch fertility + 1 [ wander ]]
      [ hatch fertility     [ wander ]]
  ]
end 

;; unici visek oseb
;; rdeci in modri imajo enak odstotek smrtnosti

to grim-reaper
  let num-turtles count turtles
  if num-turtles <= steviloPrebivalstva
    [ stop ]
  let chance-to-die (num-turtles - steviloPrebivalstva) / num-turtles
  ask turtles
  [
    if random-float 1.0 < chance-to-die
      [ die ]
  ]
end 


; Copyright 1997 Uri Wilensky.
; See Info tab for full copyright and license.

There is only one version of this model, created over 11 years ago by Matjaž Jeruc.

Attached files

No files

Parent: Simple Birth Rates

This model does not have any descendants.

Graph of models related to 'Child of Simple Birth Rates'

NetLogo