Get the state of the agent
agent
an external pointer returned by newAgent
If agent is an R6 object, then we should either use agent$schedule, or use schedule(agent$get, event)
a list holding the state