environment - simmer-r get_attribute render NA

Question

I am new to simmer-r and am trying to set an attribute in one trajectory, get the generated attribute in another trajectory, and set a new attribute. However, when I tried to get this newly created attribute, no value is created and I get NA. I was wondering if there is something wrong with my code?

Below I provided an example

Thanks in advance for your help.

library(simmer)
env <- simmer()

g <- trajectory("G's path") %>%
  set_attribute("ga_score", function() 2)



p <- trajectory("P's path") %>%
  set_attribute("pa_score", function() 10) %>%
  set_attribute("mult",function() get_attribute(env,"pa_score") * get_attribute(env,"ga_score")) %>%
  timeout(function() 5) %>%
  log_(function() paste0('the attribute is:', get_attribute(env,"mult")))
   

env %>%
  add_generator(name_prefix = "P's sim ", trajectory = p, distribution =  function() 5,mon = 2) %>%
  run(until = 40)

question from:https://stackoverflow.com/questions/65650682/simmer-r-get-attribute-render-na

Answer 1

Waitting for answers