simSeqSample: simSeqSample
In PeFox/DySeq: Functions for Dyadic Sequence Analyses

Simulates N single sequences with four possible states.

1	simSeqSample(trans, initial, length, N)

`trans`	a 4x4 matrix containing transition probabilities
`initial`	a four element vector containing initial states probabilities
`length`	single value specifying the length of the simulated sequence (columns)
`N`	number of sequences which should be simulated (rows)

test1<-matrix(c(0.5 , 0.2 , 0.2 , 0.1,
                0.8 , 0.05, 0.05, 0.1,
                0.5 , 0.1 , 0.2 , 0.2,
                0.1 , 0.1 , 0.1 , 0.7) , 4 , 4 , byrow = TRUE)

initial<-c(.25 , .25 , .25 , .25)

simSeq(test1, initial, 30)