сравнение двух кодовых скобок, которые должны делать то же самое

Question

Извините, если я вас раздражаю, но мой учитель говорит, что этот код [1] недостаточно хорош, и я должен работать с агентами вместо invidual значений.

код [1] (первый код работал очень хорошо)

let temp_ahead [(output-heat + 1)^ Freedom] of patch-ahead 1 
let temp_right_ahead [(output-heat + 1)^ Freedom] of patch-right-and-ahead 45 1 
let temp_right [(output-heat + 1)^ Freedom] of patch-right-and-ahead 90 1 
let temp_right_back [(output-heat + 1)^ Freedom] of patch-right-and-ahead 135 1 
let temp_back [(output-heat + 1)^ Freedom] of patch-right-and-ahead 180 1 
let temp_left_back [(output-heat + 1)^ Freedom] of patch-left-and-ahead 135 1 
let temp_left [(output-heat + 1)^ Freedom] of patch-left-and-ahead 90 1 
let temp_left_ahead [(output-heat + 1)^ Freedom] of patch-left-and-ahead 45 1 


set temp_ahead_kumulativ temp_ahead 
set temp_right_ahead_kumulativ (temp_ahead_kumulativ + temp_right_ahead) 
set temp_right_kumulativ (temp_right_ahead_kumulativ + temp_right) 
set temp_right_back_kumulativ (temp_right_kumulativ + temp_right_back) 
set temp_back_kumulativ (temp_right_back_kumulativ + temp_back) 
set temp_left_back_kumulativ (temp_back_kumulativ + temp_left_back) 
set temp_left_kumulativ (temp_left_back_kumulativ + temp_left) 
set temp_left_ahead_kumulativ (temp_left_kumulativ + temp_left_ahead) 

set propability_number (random-float (temp_left_ahead_kumulativ)) 

if propability_number < temp_ahead_kumulativ [right 0] 
if propability_number < temp_right_ahead [right 45] 
if propability_number < temp_right_kumulativ [right 90] 
if propability_number < temp_right_back_kumulativ [right 135] 
if propability_number < temp_back_kumulativ [right 180] 
if propability_number < temp_left_back_kumulativ [left 135] 
if propability_number < temp_left_kumulativ [left 90] 
if propability_number < temp_left_ahead_kumulativ [left 45] 

Мой код [2] (не работает, как код [1], что не так?):

;;all temperatrue-values around the turtle saved in list 
set temperature_values [(output-heat + 1)^Freedom] of neighbors 


;;build cumulative value of temperatures and put each value in list 
let tempsum 0 
set tempsum_list [] 
foreach temperature_values 
    [set tempsum (tempsum + ?) 
    set tempsum_list lput tempsum tempsum_list 
    ] 


;;create a random number between 0 and the last tempsum-value 
let probability_number random-float tempsum + 1 


if probability_number < item 0 tempsum_list 
    [left 45] 
if (probability_number < item 1 tempsum_list) 
    [left 90] 
if (probability_number < item 2 tempsum_list) 
    [left 135] 
if (probability_number < item 3 tempsum_list) 
    [right 180] 
if (probability_number < item 4 tempsum_list) 
    [right 135] 
if (probability_number < item 5 tempsum_list) 
    [right 90] 
if (probability_number < item 6 tempsum_list) 
    [right 45] 
if (probability_number < item 7 tempsum_list) 
    [right 0] 

в Code [2] Я попытался работать с агентами, но результат не похож на результат в Code [1]. В Code [1] мои черепахи создают приятные huddles, но в Code [2] они этого не делают. Я немного отчаянный ... если есть вопросы. черепахи должны двигаться с большей вероятностью к патчу с более высоким значением «выходного тепла».

Answer 1

Эта строка set propability_number (random-float (temp_left_ahead_kumulativ)) не делает то же самое, что и let probability_number random-float tempsum + 1.

Проведите некоторое тестирование. У вас есть заявление на печать для номера вероятности, после того, как вы его создали, запустите его примерно 10 раз и проверьте, соответствуют ли цифры вашим ожиданиям.

У вас также возникли проблемы с вашими заявлениями if, как описано в предыдущем вопросе how can i set a probability for each action?. Опять же, лучший способ учиться - это провести некоторое тестирование, чтобы увидеть, как все работает. Различие между if и ifelse очень важно, чтобы заставить вас делать то, что вы ожидаете.