* При наличии 3 тыс. Патчей скорость netlogo нормальная.Но когда я изменяю размер мира (99 * 99), скорость слишком низкая около 5 минут, обновляется 10 тиков.Я стремлюсь улучшить скорость этого.Ниже приведен код.
to publish
set contribution_list ( reverse sort [cumulative-contribution] of patches)
let m count patches
if contribution > item (round( m * shibei-proportion) ) contribution_list
[set pcolor blue + 3]
if contribution > item (round( m * (shibei-proportion + bian-proportion)) ) contribution_list
[set pcolor blue + 2]
if contribution > item (round( m * (shibei-proportion + bian-proportion + dahongbao-proportion))) contribution_list
[set pcolor blue + 1]
set cumulative-contribution 0
end