## ------------------------------------------------
## Method `IEdge3$new`
## ------------------------------------------------
iedge <- IEdge3$new(c(1, 1, 1), c(1, 2, 3))
iedge
iedge$O
iedge$O <- c(1, 0, 0)
iedge
## ------------------------------------------------
## Method `IEdge3$print`
## ------------------------------------------------
IEdge3$new(c(2, 0, 0), c(3, -1, 4))
Run the code above in your browser using DataLab