from otree.api import ( models, widgets, BaseConstants, BaseSubsession, BaseGroup, BasePlayer, Currency as c, currency_range, Page, WaitPage ) cu = c doc = '错峰出行的激励机制研究——基于通勤者出发时间选择实验(空）' class Constants(BaseConstants): name_in_url = 'Backup1' players_per_group = 2 num_rounds = 1 ticket_price = c(4) endowment = c(300) class Subsession(BaseSubsession): pass def next_day(group): # import time import random group.day += group.day group.passager_amount = 0 players = group.get_players() ''' 计算优先级、出行扣费、改变出发班次扣费 ''' for p in players: # t = time.time() # p.priority = (int(round(t * 1000))) # 时间戳 p.priority = random.randint(1,100) # time.sleep(0.01) # 对之前的扣费清零 p.money_ticket = 0 p.money_crowd = 0 p.money_late = 0 p.money_wait = 0 p.money_change = 0 p.money -= 4 # 出行一次扣费 p.money_ticket += 4 p.money -= abs(p.pre_flight - p.current_flight) # 改变出发班次扣费 p.money_change += abs(p.pre_flight - p.current_flight) p.pre_flight = p.current_flight # 对下次来说，这次的班次是上次班次 p.real_flight = p.current_flight # 实际班次，将根据人数多少进行改变 ''' 计算拥挤扣费、实际班次 ''' people = [0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0] pris = [] # 第1-7班车 for index in range(1,8): for p in players: if (p.real_flight == index): people[index] += 1 pris.append(p.priority) pris.sort() # 按优先级升序排列 if people[index] == 2: # 第index班车人数为2，拥挤扣费 for p in players: if (p.real_flight == index): p.money -= 1 p.money_crowd += 1 if people[index] >= 3: # 第index班车人数3以上，拥挤扣费 ###挤到下一班的等待扣费 for p in players: if (p.real_flight == index): if (p.priority < pris[2]): # 优先级为前2 p.money -= 1 p.money_crowd += 1 else: p.real_flight += 1 # 优先级为第3及以后 pris = [] # 第8班车 for p in players: if (p.real_flight == 8): people[8] += 1 pris.append(p.priority) pris.sort() # 按优先级升序排列 if people[8] == 2: # 第8班车人数为2，拥挤扣费 for p in players: if (p.real_flight == 8): p.money -= 1 p.money_crowd += 1 if people[8] >= 3: # 第8班车人数3以上，拥挤扣费 ###挤到下一班的等待扣费 for p in players: if (p.real_flight == 8): if (p.priority < pris[2]): # 优先级为前2 p.money -= 1 p.money_crowd += 1 else: p.real_flight += 1 # 优先级为第3及以后 # 第9班车 for p in players: if (p.real_flight == 9): people[9] += 1 if people[9] == 2: # 第8班车人数为2，拥挤扣费 for p in players: if (p.real_flight == 9): p.money -= 1 p.money_crowd += 1 ''' 计算等待扣费、迟到扣费 ''' for p in players: p.money -= p.real_flight-p.current_flight p.money_wait += p.real_flight-p.current_flight if p.real_flight > 5: p.money -= p.real_flight-5 p.money_late += p.real_flight-5 def next_day_encourage1(group): # import time import random group.day += group.day group.passager_amount = 0 players = group.get_players() ''' 计算优先级、出行扣费、改变出发班次扣费 ''' for p in players: # t = time.time() # p.priority = (int(round(t * 1000))) # 时间戳 p.priority = random.randint(1,100) # time.sleep(0.01) # 对之前的扣费清零 p.money_ticket = 0 p.money_crowd = 0 p.money_late = 0 p.money_wait = 0 p.money_change = 0 p.money -= 4 # 出行一次扣费 p.money_ticket += 4 p.money -= abs(p.pre_flight - p.current_flight) # 改变出发班次扣费 p.money_change += abs(p.pre_flight - p.current_flight) p.pre_flight = p.current_flight # 对下次来说，这次的班次是上次班次 p.real_flight = p.current_flight # 实际班次，将根据人数多少进行改变 ''' 计算拥挤扣费、实际班次 ''' people = [0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0] pris = [] # 第1-7班车 for index in range(1,8): for p in players: if (p.real_flight == index): people[index] += 1 pris.append(p.priority) pris.sort() # 按优先级升序排列 if people[index] == 2: # 第index班车人数为2，拥挤扣费 for p in players: if (p.real_flight == index): p.money -= 1 p.money_crowd += 1 if people[index] >= 3: # 第index班车人数3以上，拥挤扣费 ###挤到下一班的等待扣费 for p in players: if (p.real_flight == index): if (p.priority < pris[2]): # 优先级为前2 p.money -= 1 p.money_crowd += 1 else: p.real_flight += 1 # 优先级为第3及以后 pris = [] # 第8班车 for p in players: if (p.real_flight == 8): people[8] += 1 pris.append(p.priority) pris.sort() # 按优先级升序排列 if people[8] == 2: # 第8班车人数为2，拥挤扣费 for p in players: if (p.real_flight == 8): p.money -= 1 p.money_crowd += 1 if people[8] >= 3: # 第8班车人数3以上，拥挤扣费 ###挤到下一班的等待扣费 for p in players: if (p.real_flight == 8): if (p.priority < pris[2]): # 优先级为前2 p.money -= 1 p.money_crowd += 1 else: p.real_flight += 1 # 优先级为第3及以后 # 第9班车 for p in players: if (p.real_flight == 9): people[9] += 1 if people[9] == 2: # 第8班车人数为2，拥挤扣费 for p in players: if (p.real_flight == 9): p.money -= 1 p.money_crowd += 1 ''' 计算等待扣费、迟到扣费 ''' for p in players: p.money -= p.real_flight-p.current_flight p.money_wait += p.real_flight-p.current_flight if p.real_flight > 5: p.money -= p.real_flight-5 p.money_late += p.real_flight-5 ''' 以下是激励机制1的新增内容: ''' for p in players: if p.current_flight<=2: p.money+=2 p.money_ticket-=2 p.saved_money+=2 p.saved_days+=1 def next_day_week3_end(group): # import time import random group.day += group.day group.passager_amount = 0 players = group.get_players() ''' 计算优先级、出行扣费、改变出发班次扣费 ''' for p in players: # t = time.time() # p.priority = (int(round(t * 1000))) # 时间戳 p.priority = random.randint(1,100) # time.sleep(0.01) # 对之前的扣费清零 p.money_ticket = 0 p.money_crowd = 0 p.money_late = 0 p.money_wait = 0 p.money_change = 0 ''' 以下是week3_end的新增内容: ''' p.saved_days = 0 p.money -= 4 # 出行一次扣费 p.money_ticket += 4 p.money -= abs(p.pre_flight - p.current_flight) # 改变出发班次扣费 p.money_change += abs(p.pre_flight - p.current_flight) p.pre_flight = p.current_flight # 对下次来说，这次的班次是上次班次 p.real_flight = p.current_flight # 实际班次，将根据人数多少进行改变 ''' 计算拥挤扣费、实际班次 ''' people = [0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0] pris = [] # 第1-7班车 for index in range(1,8): for p in players: if (p.real_flight == index): people[index] += 1 pris.append(p.priority) pris.sort() # 按优先级升序排列 if people[index] == 2: # 第index班车人数为2，拥挤扣费 for p in players: if (p.real_flight == index): p.money -= 1 p.money_crowd += 1 if people[index] >= 3: # 第index班车人数3以上，拥挤扣费 ###挤到下一班的等待扣费 for p in players: if (p.real_flight == index): if (p.priority < pris[2]): # 优先级为前2 p.money -= 1 p.money_crowd += 1 else: p.real_flight += 1 # 优先级为第3及以后 pris = [] # 第8班车 for p in players: if (p.real_flight == 8): people[8] += 1 pris.append(p.priority) pris.sort() # 按优先级升序排列 if people[8] == 2: # 第8班车人数为2，拥挤扣费 for p in players: if (p.real_flight == 8): p.money -= 1 p.money_crowd += 1 if people[8] >= 3: # 第8班车人数3以上，拥挤扣费 ###挤到下一班的等待扣费 for p in players: if (p.real_flight == 8): if (p.priority < pris[2]): # 优先级为前2 p.money -= 1 p.money_crowd += 1 else: p.real_flight += 1 # 优先级为第3及以后 # 第9班车 for p in players: if (p.real_flight == 9): people[9] += 1 if people[9] == 2: # 第8班车人数为2，拥挤扣费 for p in players: if (p.real_flight == 9): p.money -= 1 p.money_crowd += 1 ''' 计算等待扣费、迟到扣费 ''' for p in players: p.money -= p.real_flight-p.current_flight p.money_wait += p.real_flight-p.current_flight if p.real_flight > 5: p.money -= p.real_flight-5 p.money_late += p.real_flight-5 ''' 以下是激励机制1的新增内容: ''' for p in players: if p.current_flight<=2: p.money+=2 p.money_ticket-=2 p.saved_money+=2 p.saved_days+=1 def next_day_week2_end(group): # import time import random group.day += group.day group.passager_amount = 0 players = group.get_players() ''' 计算优先级、出行扣费、改变出发班次扣费 ''' for p in players: # t = time.time() # p.priority = (int(round(t * 1000))) # 时间戳 p.priority = random.randint(1,100) # time.sleep(0.01) # 对之前的扣费清零 p.money_ticket = 0 p.money_crowd = 0 p.money_late = 0 p.money_wait = 0 p.money_change = 0 ''' 以下是week2_end的新增内容 ''' p.money = 100 p.money -= 4 # 出行一次扣费 p.money_ticket += 4 p.money -= abs(p.pre_flight - p.current_flight) # 改变出发班次扣费 p.money_change += abs(p.pre_flight - p.current_flight) p.pre_flight = p.current_flight # 对下次来说，这次的班次是上次班次 p.real_flight = p.current_flight # 实际班次，将根据人数多少进行改变 ''' 计算拥挤扣费、实际班次 ''' people = [0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0] pris = [] # 第1-7班车 for index in range(1,8): for p in players: if (p.real_flight == index): people[index] += 1 pris.append(p.priority) pris.sort() # 按优先级升序排列 if people[index] == 2: # 第index班车人数为2，拥挤扣费 for p in players: if (p.real_flight == index): p.money -= 1 p.money_crowd += 1 if people[index] >= 3: # 第index班车人数3以上，拥挤扣费 ###挤到下一班的等待扣费 for p in players: if (p.real_flight == index): if (p.priority < pris[2]): # 优先级为前2 p.money -= 1 p.money_crowd += 1 else: p.real_flight += 1 # 优先级为第3及以后 pris = [] # 第8班车 for p in players: if (p.real_flight == 8): people[8] += 1 pris.append(p.priority) pris.sort() # 按优先级升序排列 if people[8] == 2: # 第8班车人数为2，拥挤扣费 for p in players: if (p.real_flight == 8): p.money -= 1 p.money_crowd += 1 if people[8] >= 3: # 第8班车人数3以上，拥挤扣费 ###挤到下一班的等待扣费 for p in players: if (p.real_flight == 8): if (p.priority < pris[2]): # 优先级为前2 p.money -= 1 p.money_crowd += 1 else: p.real_flight += 1 # 优先级为第3及以后 # 第9班车 for p in players: if (p.real_flight == 9): people[9] += 1 if people[9] == 2: # 第8班车人数为2，拥挤扣费 for p in players: if (p.real_flight == 9): p.money -= 1 p.money_crowd += 1 ''' 计算等待扣费、迟到扣费 ''' for p in players: p.money -= p.real_flight-p.current_flight p.money_wait += p.real_flight-p.current_flight if p.real_flight > 5: p.money -= p.real_flight-5 p.money_late += p.real_flight-5 ''' 以下是激励机制1的新增内容: ''' for p in players: if p.current_flight<=2: p.money+=2 p.money_ticket-=2 p.saved_money+=2 p.saved_days+=1 class Group(BaseGroup): day = models.IntegerField(initial=1, label='今天是') passager_amount = models.IntegerField(initial=0) next_day = next_day next_day_encourage1 = next_day_encourage1 next_day_week3_end = next_day_week3_end next_day_week2_end = next_day_week2_end class Player(BasePlayer): pre_flight = models.IntegerField(label='您的习惯到达教室时间是（请输入1-7中的一项)：', max=7, min=1) current_flight = models.IntegerField(label='今天您选择的班次是？（请输入1-7中的一项)', max=7, min=1) real_flight = models.IntegerField() money = models.IntegerField(initial=100) money_ticket = models.IntegerField(initial=0) money_crowd = models.IntegerField(initial=0) money_wait = models.IntegerField(initial=0) money_late = models.IntegerField(initial=0) money_change = models.IntegerField(initial=0) saved_money = models.IntegerField(initial=0) saved_days = models.IntegerField(initial=0) priority = models.IntegerField() def custom_export(players): yield ['participant_code', 'id_in_group'] for p in players: pp = p.participant yield [pp.code, p.id_in_group]