Clamps Dictionary

m-next

Function

(m-next curr seq &key (test #'=) (num 1) (key #'identity) (order 1))

Given curr as starting point (nil for any start), retrieve num elements of seq using markov probabilities of order order.

Arguments

`curr`	List of the last elements.
`seq`	List with the model sequence of the markov selection.
`test`	Function to test elements.
`key`	Function to retrieve the elements for comparison.

Example

;; get a sequence of 30 values based on the markov probabilities of
;; order 1

(m-next nil '(1 3 2 3 7 1 2 5 6 2 7 3) :num 30)
;; => (2 3 1 3 2 5 6 2 5 6 2 3 1 2 3 2 7 3 1 2 3 1 3 1 3 2 5 6 2 3)