เนื่องจากคำถามนี้ได้รับคำตอบที่แตกต่างจากทางดาราศาสตร์เล็กน้อยถึงเกือบ 100% ฉันจึงขอเสนอการจำลองเพื่อใช้เป็นข้อมูลอ้างอิงและแรงบันดาลใจสำหรับการแก้ปัญหาที่ได้รับการปรับปรุง
ฉันเรียกสิ่งเหล่านี้ว่า แต่ละคนบันทึกการกระจายตัวของสารพันธุกรรมภายในประชากรในขณะที่มันแพร่พันธุ์ในรุ่นต่อเนื่อง พล็อตคืออาร์เรย์ของเซ็กเมนต์แนวดิ่งบาง ๆ ที่สื่อถึงผู้คน แต่ละแถวแสดงถึงการสร้างโดยเริ่มต้นที่ด้านบน ทายาทของแต่ละรุ่นอยู่ในแถวด้านล่างทันที
ในตอนแรกมีเพียงคนเดียวในประชากรขนาดถูกทำเครื่องหมายและพล็อตเป็นสีแดง (มันยากที่จะมองเห็น แต่พวกมันจะถูกพล็อตที่ด้านขวาของแถวบนเสมอ) ทายาทสายตรงของพวกเขาจะถูกวาดด้วยสีแดง พวกเขาจะปรากฏในตำแหน่งสุ่มอย่างสมบูรณ์ ทายาทอื่นถูกลงจุดเป็นสีขาว เนื่องจากขนาดประชากรอาจแตกต่างจากรุ่นหนึ่งไปอีกรุ่นหนึ่งขอบสีเทาทางด้านขวาจะถูกใช้เพื่อเติมเต็มพื้นที่ว่างn
นี่คืออาร์เรย์ของผลการจำลองอิสระ 20 แบบ
ในที่สุดสารพันธุกรรมสีแดงก็ตายในเก้าของการจำลองเหล่านี้ทิ้งผู้รอดชีวิตในส่วนที่เหลืออีก 11 (55%) (ในสถานการณ์สมมติเดียวด้านล่างซ้ายดูเหมือนว่าประชากรทั้งหมดจะเสียชีวิตในที่สุด) ทุกที่ที่มีผู้รอดชีวิตแม้ว่าประชากรเกือบทั้งหมดจะมีสารพันธุกรรมสีแดง สิ่งนี้แสดงหลักฐานว่าโอกาสของบุคคลที่ถูกสุ่มเลือกจากคนรุ่นสุดท้ายที่มียีนสีแดงประมาณ 50%
การจำลองการทำงานโดยการสุ่มกำหนดผู้รอดชีวิตและอัตราการเกิดเฉลี่ยที่จุดเริ่มต้นของแต่ละรุ่น ผู้รอดชีวิตมาจากการแจกแจงแบบเบต้า (6,2): เฉลี่ย 75% ตัวเลขนี้สะท้อนถึงความเป็นมรรตัยทั้งก่อนเป็นผู้ใหญ่และคนที่ไม่มีลูก อัตราการเกิดมาจากการแจกแจงแกมม่า (2.8, 1) ดังนั้นจึงมีค่าเฉลี่ย 2.8 ผลที่ได้คือเรื่องราวที่โหดร้ายของความสามารถในการสืบพันธุ์ไม่เพียงพอที่จะชดเชยการตายสูงโดยทั่วไป มันแสดงถึงโมเดลที่มองโลกในแง่ร้ายและเลวร้ายที่สุด - แต่ (ตามที่ฉันแนะนำในการแสดงความคิดเห็น) ความสามารถของประชากรในการเติบโตนั้นไม่จำเป็น สิ่งที่สำคัญในแต่ละรุ่นคือสัดส่วนของสีแดงในประชากร
ในการสร้างแบบจำลองประชากรปัจจุบันจะผอมลงไปถึงผู้รอดชีวิตโดยการสุ่มตัวอย่างแบบง่าย ๆ ตามขนาดที่ต้องการ ผู้รอดชีวิตเหล่านี้จะถูกจับคู่แบบสุ่ม (ผู้รอดชีวิตแปลก ๆ ที่เหลืออยู่หลังจากการจับคู่จะไม่ทำซ้ำ) แต่ละคู่ผลิตเด็กจำนวนหนึ่งที่ดึงมาจากการแจกแจงปัวซงซึ่งหมายถึงอัตราการเกิดของรุ่น หากผู้ปกครองคนใดคนหนึ่งมีเครื่องหมายสีแดงเด็กทุกคนจะได้รับมรดก: สิ่งนี้เป็นแบบจำลองความคิดของการสืบเชื้อสายโดยตรงผ่านผู้ปกครองทั้งสอง
ตัวอย่างนี้เริ่มต้นด้วยประชากร 512 และเรียกใช้การจำลองสำหรับรุ่นที่ 11 (12 แถวรวมถึงจุดเริ่มต้น) การเปลี่ยนแปลงของการจำลองนี้เริ่มต้นเพียงไม่กี่และมากถึง2 14 = 16 , 384คนโดยใช้จำนวนผู้รอดชีวิตและอัตราการเกิดที่แตกต่างกันทั้งหมดมีลักษณะคล้ายกัน: ในตอนท้ายของบันทึก2 ( n )รุ่น (เก้า) ในกรณีนี้) มีโอกาสประมาณ 1/3 ที่สีแดงทั้งหมดเสียชีวิต แต่ถ้าไม่เป็นเช่นนั้นประชากรส่วนใหญ่จะเป็นสีแดง ภายในสองหรือสามรุ่นประชากรเกือบทั้งหมดเป็นสีแดงและจะยังคงเป็นสีแดง (หรือประชากรจะตายไปพร้อมกัน)n=8214=16,384log2(n)
ผู้รอดชีวิต 75% หรือน้อยกว่าในรุ่นนั้นไม่ได้เป็นคนเพ้อฝัน ในปลายปี 1347 หนูที่ถูกรบกวนด้วยโรคกาฬโรคนั้นได้เดินทางจากเอเชียไปยังยุโรป ในช่วงสามปีถัดไปมีผู้เสียชีวิตระหว่าง 10% ถึง 50% ของประชากรยุโรป กาฬโรคกำเริบเกือบหนึ่งครั้งในรุ่นต่อมาหลายร้อยปีหลังจากนั้น
รหัส
การจำลองถูกสร้างขึ้นด้วยMathematica 8:
randomPairs[s_List] := Partition[s[[Ordering[RandomReal[{0, 1}, Length[s]]]]], 2];
next[s_List, survive_, nKids_] := Flatten[ConstantArray[Max[#],
RandomVariate[PoissonDistribution[nKids]]] & /@
randomPairs[RandomSample[s, Ceiling[survive Length[s]]]]]
Partition[Table[
With[{n = 6}, ArrayPlot[NestList[next[#, RandomVariate[BetaDistribution[6, 2]],
RandomVariate[GammaDistribution[3.2, 1]]] &,
Join[ConstantArray[0, 2^n - 1], ConstantArray[1, 1]], n + 2],
AspectRatio -> 2^(n/3)/(2 n),
ColorRules -> {1 -> RGBColor[.6, .1, .1]},
Background -> RGBColor[.9, .9, .9]]
], {i, 1, 20}
], 4] // TableForm