2016-08-01 4 views
0

Из Google пытается понять пакет «simmer» в R для моделирования дискретных событий.Моделирование дискретных событий в R

Как показано в примере, приведенном в link, я пытаюсь создать симулятор, используя функцию create_simulator. но я получаю ошибку ниже

Код Использована

 trajectory <- read.table(header=T, text=       "event_id description resource  amount duration   successor       1   registration administration 1  runif(1,3,10)  2       2   intake  nurse   1  runif(1,10,20) 3       3   consultation doctor   1  runif(1,5,15)  NA" ) 


    sim <- create_simulator(name = "SuperDuperSim") %>% add_trajectory(name = "simple_trajectory", trajectory_df = trajectory) %>% add_resource(name = "administration", capacity = 1) %>% add_resource(name = "nurse", capacity = 1) %>% add_resource(name = "doctor", capacity = 2) %>% add_entities_with_interval(n = 10, name_prefix = "patient", trajectory_name = "simple_trajectory", interval = "rnorm(1,10)") %>% replicator(15) 

Ошибка:

Error in eval(expr, envir, enclos) : 
    could not find function "create_simulator" 
+0

Пожалуйста, отредактируйте ваш вопрос и укажите код, который вызвал сообщение об ошибке. Спасибо. – Uwe

ответ

1

Я никогда не использовал этот пакет до этого, но мне кажется, что функция create_simulator не существует в текущая версия пакета (функция add_trajectory, похоже, не существует). Информацию о пакете simmer можно получить по телефону https://github.com/r-simmer/simmer. Более конкретно, введение дано по адресу: https://cran.r-project.org/web/packages/simmer/vignettes/A-introduction.html. Мне кажется с этого сайта, что создание симулятора теперь производится путем ввода simmer(nameOfMySimulator).

Смежные вопросы