R/stn.R

In yuki0425/mc: Markov Chain Model

Defines functions stn

Documented in stn

stn <-
function(obj, k, ending, epsilon){
  UseMethod("stn", obj)
}