powered by
decode.icm(crf, restart = 0, start = apply(crf$node.pot, 1, which.max))
crf$n.nodes
library(CRF) data(Small) d <- decode.icm(Small$crf)
Run the code above in your browser using DataLab