案例說明奮力模型

1、Scing Segregation一模型描述分離模型（Sc）最早由.開發(fā)（微觀與宏ing Segregation M觀行為，W. W. Norton & Company，1978 年，第 147155 頁）。它代表了早期的具有自我組織能力的動態(tài)系統(tǒng)模型。將一美分和十美分的硬幣放在棋盤上，根據(jù)不同的規(guī)則移動它們。他將棋盤解釋成一座城市，棋盤上的每個方格代表一棟房子或者一塊空地。他將一美分和十美分的硬幣解釋成社會中任意兩個不同群體的智能體，比如不同種族的人、男孩和、吸煙者和非吸煙者等等。每個智能體的鄰居占據(jù)了棋盤上與這個智能體鄰近的任意方格。因此，的智能體有 8 位鄰居，而邊緣的智能體有 3 位或

2、 5 位鄰居。規(guī)則需要被詳細(xì)說明，以決定某個特定的智能體是否對其當(dāng)前位置滿意。如果不滿意，就嘗試移動該智能體到棋盤上的其它位置，或者徹底離開棋盤。正如可以預(yù)見的那樣，發(fā)現(xiàn)如果智能體的“滿意規(guī)則”是確定的，棋盤會迅速地演變成一種牢固的分離位置模式，使分離狀態(tài)特別受到青睞。然而，令人驚訝的是，他發(fā)現(xiàn)即使智能體的“規(guī)則”只是一種對于擁有同類型鄰居的很溫和的傾向，最初作為一個整體的棋盤也會變成充分的狀態(tài)。二建模步驟第一步：創(chuàng)建模型，命名為 Scing Segregation1 點擊模型，Time units 選擇 days。第二步：創(chuàng)建類。1.新建 Active Object Class，命名為，勾中

3、 Agent。2.拖入一個 Parameter，命名為 color，Type 選擇 Color，Default value 為randomTrue( 0.5 ) ? Color.red : Color.black。3.拖入一個 Variable，命名為 satisfied，Type 為。4.拖入一個 Rectangle，命名為 rect，F(xiàn)ill color 選擇 red。大小位置如下圖所示：5. 在類的 Agent 欄下，Space type 選擇 Discrete2D，勾中 Environmentdefines initial location，在 On before steps 處填入如

4、下代碼：在 On step 處填入下面代碼，表示如果沒有標(biāo)記 satisfied 的點每一步有 30%的概率跳到其他點。第三步：設(shè)置 Main 類。拖入一個 Environment，命名為 environment，勾中 Enable steps，在 Advanced1.欄中 Space type 選擇 Discrete2D，Width 和 Height 都為 400，Columns 和 Rows都為 100，Neighborhood type 選擇 Moore。Layout type 選擇 Random，勾中Apply on startup，Network type 選擇 Userdefine

5、d。拖入一個 Parameter，命名為 Threshold，Type 為 double，Default value 為2.0.7。表示設(shè)置好的閾值。將設(shè)置好的類拖入到 Main 中，命名為 people，Environment 處填入3.environment，勾中 Replicated，Initial number of objects 填入 8000，Optimize 選擇 Acs by index(ArrayList)。拖入一個 Slider，命名為 slider，勾中 Link to，并填入 Threshold，Minimum4.if( ! satisfied & randomTru

6、e( 0.3 ) ) jumpToRandomEmptyCell();/計算有多少個點和本身有相同的顏色 nsame = 0; Agent neighbors = getNeighbors();if( neighbors = null ) satisfied = true; /沒有點也標(biāo)記好return;for( Agent a : neighbors )if( ()a).color.equals( color ) )nsame+;/satisfied如果有相同顏色的點的百分比大于一個設(shè)定的閾值satisfied = nsame = get_Main().Threshold * neighbo

7、rs.length;value 為 0，um value 為 1。在 Slider 的兩側(cè)拖入兩個 button，左側(cè)的 Label 為，Enabled 填入 Threshold 5.0，Action 填入 Threshold = limitMin( 0, Threshold 0.02 );setControlValueToDefault( slider );。右側(cè)的 Label 為+，Enabled填入 Threshold 1，Action 處填入Threshold = limitMax( Threshold + 0.02,1 );setControlValueToDefault( slider );。利用 Rectangle，創(chuàng)建如下圖的圖形，將類拖入 Main 中創(chuàng)建的6.people_presenion 放置在下圖黃色方框內(nèi)的左上角，上述的 Sli