Success-biased teacher selection

The probability of selection of one of the agent's neighbors is proportional to their fitness relative to other neighbors.

Usage

success_bias_select_teacher(learner, model)

Arguments

learner

The focal learner agent

model

Agent-based model being run with this specification.

Value

Agent selected from neighbors as teacher.

Examples

net <- make_regular_lattice(10, 4)
model <- AgentBasedModel$new(network = net)
for (agent in model$agents) {
  # Agents need non-zero fitness for success bias to work
  agent$curr_fitness <- 1
}
output <- run(model, 10, 
              interact = success_bias_interact, 
              partner_selection = success_bias_select_teacher,
              iterate_model = iterate_learning_model)