RE: Class defections etc

Gatherer, D. (
Mon, 16 Aug 1999 13:38:17 +0200

Date: Mon, 16 Aug 1999 13:38:17 +0200
From: "Gatherer, D. (Derek)" <>
Subject: RE: Class defections etc
To: "''" <>

My sloppy terminologising has caused some confusion, so I'll try to be
clearer here:

for ($round = 1; $round <= $cycle; $round++)
$P_old_money = ($P * $Rp); # this is the number of babies born to
current members of the professional class. I assume they stay in the
professional class.

$W = $W * $Rw; # this is the number of babies born to the current
worker class.

$total = $P_old_money + $W; # this is the total number of babies

$P_new_money = ($proportion * $total) - $P_old_money; # the
vacancies in the upper class

$W = $W - $P_new_money; # the workers are reduced by movement

$P = $P_old_money + $P_new_money; # this is the size of the new
upper class, the combination of the old_money kids and the upwardly mobile

print OUTFILE "\n$round\t$P_old_money\t$P_new_money\t$W";

This was distributed via the memetics list associated with the
Journal of Memetics - Evolutionary Models of Information Transmission
For information about the journal and the list (e.g. unsubscribing)