# statefig

##### Draw a state space figure.

For multi-state survival models it is useful to have a figure that shows the states and the possible transitions between them. This function creates a simple "box and arrows" figure. It's goal was simplicity.

##### Usage

```
statefig(layout, connect, margin = 0.03, box = TRUE, cex = 1, col = 1,
lwd=1, lty=1, bcol=col, acol=col, alwd=lwd, alty=lty, offset=0)
```

##### Arguments

- layout
describes the layout of the boxes on the page. See the detailed description below.

- connect
a square matrix with one row for each state. If

`connect[i,j] !=0`

then an arrow is drawn from state i to state j. The row names of the matrix are used as the labels for the states.- margin
the fraction of white space between the label and the surrounding box, and between the box and the arrows, as a function of the plot region size.

- box
should boxes be drawn? TRUE or FALSE.

- cex, col, lty, lwd
default graphical parameters used for the text and boxes. The last 3 can be a vector of values.

- bcol
color for the box, if it differs from that used for the text.

- acol, alwd, alty
color, line type and line width for the arrows.

- offset
used to slight offset the arrows between two boxes x and y if there is a transition in both directions. The default of 0 leads to a double headed arrow in this case -- to arrows are drawn but they coincide. A positive value causes each arrow to shift to the left, from the view of someone standing at the foot of a arrow and looking towards the arrowhead, a negative offset shifts to the right. A value of 1 corresponds to the size of the plotting region.

##### Details

The arguments for color, line type and line width can all be vectors,
in which case they are recycled as needed. Boxes and text are drawn
in the order of the rownames of `connect`

, and arrows are drawn
in the usual R matrix order.

The `layout`

argument is normally a vector of integers, e.g., the
vector (1, 3, 2) describes a layout with 3 columns. The first has a
single state, the second column has 3 states and the third has 2.
The coordinates of the plotting region are 0 to 1 for both x and y.
Within a column the centers of the boxes are evenly spaced, with 1/2 a
space between the boxes and the margin, e.g., 4 boxes would be at 1/8,
3/8, 5/8 and 7/8. If `layout`

were a 1 column matrix with values
of (1, 3, 2) then the layout will have three rows with 1, 3, and 2
boxes per row, respectively. Alternatively, the user can supply a
2 column matrix that directly gives the centers.

The values of the connect matrix should be 0 for pairs of states that
do not have a transition and values between 0 and 2 for those that do.
States are connected by an arc that passes through the centers of the
two boxes and a third point that is between them. Specifically,
consider a line segment joining the two centers and erect a second
segment at right angles to the midpoint of length d times the distance
from center to midpoint. The arc passes through this point. A value
of d=0 gives a straight line, d=1 a right hand half circle centered
on the midpoint and d= -1 a left hand half circle.
The `connect`

matrix contains values of d+1 with -1 < d < 1.

The connecting arrow are drawn from (center of box 1 + offset) to
(center of box 2 + offset), where the the amount of offset (white
space) is determined by the `box`

and `margin`

parameters.
If a pair of states are too close together this can result in an
arrow that points the wrong way.

##### Value

a matrix containing the centers of the boxes, with the invisible attribute set.

##### Note

The goal of this function is to make ``good enough'' figures as simply
as possible,
and thereby to encourage users to draw them.
The `layout`

argument was inspired by the `diagram`

package,
which can draw more complex and well decorated figures, e.g., many
different shapes, shading,
multiple types of connecting lines, etc., but at the
price of greater complexity.

Because curved lines are drawn as a set of short line segments, line types have almost no effect for that case.

##### Examples

```
# NOT RUN {
# Draw a simple competing risks figure
states <- c("Entry", "Complete response", "Relapse", "Death")
connect <- matrix(0, 4, 4, dimnames=list(states, states))
connect[1, -1] <- c(1.1, 1, 0.9)
statefig(c(1, 3), connect)
# }
```

*Documentation reproduced from package survival, version 3.1-8, License: LGPL (>= 2)*