createEvents: Creates Events
In ODEnetwork: Network of Differential Equations

Description Usage Arguments Value Examples

Creates functions for constant and linear events of the given ODEnetwork to know when events have to be replaced or forced.

1	createEvents(odenet)

odenet

[ODEnetwork]
List of class ODEnetwork.

an extended list of class [ODEnetwork].

if (interactive()) {
  masses <- 1
  dampers <- as.matrix(1.5)
  springs <- as.matrix(4)
  odenet <- ODEnetwork(masses, dampers, springs)
  eventdat <- data.frame(  var = c("x.1", "x.1")
                         , time = c(1, 3)
                         , value = c(1, 3)
                         , stringsAsFactors = TRUE
                         )
  odenet <- setState(odenet, 0, 0)
  odenet <- setEvents(odenet, eventdat)
  createEvents(odenet)
}