Closed
Description
Related to #21
library(simmer)
t0<-
create_trajectory() %>%
seize("t-rex") %>%
timeout(5) %>%
release("t-rex")
sim<-
simmer() %>%
add_resource("t-rex", capacity = schedule(timetable = c(5,10,15),
period=Inf,
values = c(1,0,1))) %>%
add_generator("piggy", t0, at(0,0,0)) %>%
run()
plot_evolution_arrival_times(sim)
get_mon_arrivals(sim)
Using the above example, we get the expected end time output with simmer version b1502ae (= version that closed this issue):
name start_time end_time activity_time finished replication
1 piggy0 0 10 5 TRUE 1
2 piggy2 0 20 5 TRUE 1
3 piggy1 0 25 5 TRUE 1
However, the current version gives the wrong output, 12d04a7:
name start_time end_time activity_time finished replication
1 piggy0 0 10 5 TRUE 1
2 piggy1 0 15 5 TRUE 1
3 piggy2 0 20 5 TRUE 1
Haven't looked into it yet.