require(readxl)
dat <- read_xlsx(exampleData("exampleGosling.xlsx"))
init <- initScenario(dat,
uValue = 2,
optimisticRule = "expectation",
fixDistance = 3)
Run the code above in your browser using DataLab