from otree.api import ( models, widgets, BaseConstants, BaseSubsession, BaseGroup, BasePlayer, Currency as c, currency_range, ) import random import itertools import numpy as np from django import forms from django.forms import widgets as django_widgets import math author = 'Zheng Li' doc = """ Intertemporal Choice """ class Constants(BaseConstants): name_in_url = 'inter_main' players_per_group = None decisions = [ # pairs of tau2 and tau1# # [0:8] choose 4 and 1 from the chosen 4 ['In 1 week', 'Today'], ['In 2 weeks', 'Today'], ['In 1 month', 'Today'], ['In 3 months', 'Today'], ['In 9 months', 'Today'], ['In 1.5 years', 'Today'], ['In 2 years', 'Today'], ['In 3 years', 'Today'], # [8:15] choose 4 and 1 from the chosen 4 ['In 2 months', 'In 1 month'], ['In 3 months', 'In 1 month'], ['In 6 months', 'In 1 month'], ['In 9 months', 'In 1 month'], ['In 1.5 years', 'In 1 month'], ['In 2 years', 'In 1 month'], ['In 3 years', 'In 1 month'], # [15:18] subadditivity 1 ['In 6 months', 'Today'], ['In 1 year', 'In 6 months'], ['In 1 year', 'Today'], # [18:21] subadditivity 2 ['In 2 years', 'In 1 year'], ['In 3 years', 'In 2 years'], ['In 3 years', 'In 1 year'] ] amounts = [40, 50, 60] steps = 2 num_rounds = 12 # to generate the certainty-uncertainty spectrum bar list1 = np.arange(1 * 20, - 1, -1) list2 = [] list2.append(0) for x in range(20): list2.append((x+1)*5) class Subsession(BaseSubsession): def creating_session(self): if self.round_number == 1: for p in self.get_players(): p.participant.vars['set_identifier'] = random.choice([1,2]) # set default; only if failed check, becomes True p.participant.vars['failed_comprehension'] = False # randomly choose the round that determines payment p.participant.vars['lists_paying_round'] = random.randint(1, Constants.num_rounds) # randomly assign ((tau2, tau1),pay_amount)'s # determine the first part of 5 pairs of dates dates1 = random.sample(Constants.decisions[0:8], 4) dates_1 = list() for date in dates1: amount_tmp = random.choice(Constants.amounts) date = (date, amount_tmp) dates_1.append(date) dates_1_extra = random.choice(dates_1) dates_1.append(dates_1_extra) # now has 4+1 pairs from [0:8] # determine the second part of 4 pairs of dates dates2 = random.sample(Constants.decisions[8:15], 3) dates_2 = list() for date in dates2: amount_tmp = random.choice(Constants.amounts) date = (date, amount_tmp) dates_2.append(date) dates_2_extra = random.choice(dates_2) dates_2.append(dates_2_extra) # now has 3+1 pairs from [8:15] # determine the subadditivity part of 3 dates if p.participant.vars['set_identifier'] == 1: datessub = Constants.decisions[15:18] elif p.participant.vars['set_identifier'] == 2: datessub = Constants.decisions[18:21] dates_sub = list() amount_tmp = random.choice(Constants.amounts) for date in datessub: date = (date, amount_tmp) dates_sub.append(date) # create a list {(tau2(i), tau1(i)), pay_amount(i)}i from 0 to 11 p.participant.vars['dates'] = random.sample(dates_1 + dates_2 + dates_sub, 12) for p in self.get_players(): p.set_current_task_number() p.set_identifier = p.participant.vars['set_identifier'] class Group(BaseGroup): pass class Player(BasePlayer): prolific_id = models.StringField() # whether the payment to participant is determined this around on_paying_round = models.BooleanField(initial=False) # which of the subadditivity set set_identifier = models.IntegerField() # parameters in the optimization problem pay_amount = models.IntegerField() # benchmark payment at tau2 time_date_lhs = models.StringField() #tau2 time_date_rhs = models.StringField() #tau1 # indicator_never_always_switcher = models.IntegerField() # indifferent payment task: switching_point = models.FloatField() confidence = models.FloatField() # higher -> more confident; from 0 to 20 respectively corresponding to from 0% to 100%; step = $5% # overall indicator of whether passed the comprehension check failed_comprehension = models.BooleanField(initial=False) # indicators of whether correctly answered each question qn_lottery_got_wrong = models.BooleanField(initial=False) qn_list_got_wrong = models.BooleanField(initial=False) qn_confidence_got_wrong = models.BooleanField(initial=False) qn_hypo_got_wrong = models.BooleanField(initial=False) # 4 comprehension questions qn_hypo = models.IntegerField( choices=[ [1, 'In making my decisions, I am asked to assume that I will actually receive all payments indicated, regardless of whether they take place now or in the future.'], [0, 'In making my decisions, I am asked to assume that it is less likely that I will actually receive payments that are meant to take place in the future.'], [0, 'In making my decisions, I am asked to assume that it is less likely that I will actually receive payments that are meant to take place now.'], ], widget=widgets.RadioSelect, blank=False, label="" ) qn_lottery = models.IntegerField( choices=[ [0, 'It would be possible that I get paid both $15 and $20, i.e., I may receive a total amount of $35 from this decision.'], [1, 'I would receive EITHER $15 today OR $20 in 10 days.'], [0, 'It would be possible that I receive no money from this decision.'], ], widget=widgets.RadioSelect, blank=False, label="" ) qn_list = models.IntegerField( choices=[ [0, 'This person indicated that the delayed payment would be worth more to them than $9 today.'], [0, 'This person indicated that the delayed payment would be worth between $3 and $7 to them today.'], [1, 'This person indicated that the delayed payment would be worth between $8 and $9 to them today.'], ], widget=widgets.RadioSelect, blank=False, label="" ) qn_confidence = models.FloatField( blank=False, label="" ) # to determine parameters in the current task def set_current_task_number(self): setattr(self, 'time_date_lhs', self.participant.vars['dates'][self.round_number - 1][0][0]) setattr(self, 'time_date_rhs', self.participant.vars['dates'][self.round_number - 1][0][1]) setattr(self, 'pay_amount', self.participant.vars['dates'][self.round_number - 1][1]) def current_choice(self): iet_choice = [(self.time_date_lhs, self.time_date_rhs, self.pay_amount)] return iet_choice # to generate the list of payments for option B in List.html def frange(self, start, stop, step): i = start while i < stop: if isinstance(i, int): yield i else: yield round(i, 2) i += step # to display the list of payments for option B in List.html def right_side_amounts1(self): if self.pay_amount > 0: lst = self.frange(0, self.pay_amount + 1, Constants.steps) return list(enumerate(lst, 1)) # creating a list of tuples from looping "lst" with the starting index = 1 # to display the confidence interval in Valuation.html def range_bounds(self): if self.pay_amount > 0: bounds = [0, self.pay_amount] return bounds # def table_length1(self): return abs(self.pay_amount)/Constants.steps + 1 # def set_switching_point_and_indicator(self): if self.pay_amount > 0: if self.switching_point == 9999: # the template sets it to be 9999 when the player always chooses option A self.switching_point = self.pay_amount + Constants.steps self.indicator_never_always_switcher = 2 elif self.switching_point == 0: # the template sets it to be 0 when the player always chooses option B self.indicator_never_always_switcher = 0 else: self.indicator_never_always_switcher = 1 # when a middle point is chosen (what is desired) elif self.pay_amount < 0: ###how if self.switching_point == 9999: self.switching_point = 1 self.indicator_never_always_switcher = 2 elif self.switching_point == self.pay_amount: self.indicator_never_always_switcher = 0 else: self.indicator_never_always_switcher = 1