diff --git a/R/Fitting.r b/R/Fitting.r index f9bc350..8c4b00f 100644 --- a/R/Fitting.r +++ b/R/Fitting.r @@ -260,7 +260,7 @@ fitMarkovChain=function(clickstreamList, order=1, verbose=TRUE, control=list()) n=sum(lens) ratio=length(lens[lens>order])/length(lens) if (ratio<0.5) { - stop("The order is to high for the specified click streams.") + stop("The order is too high for the specified click streams.") } else if (ratio<1 && verbose) { warning(paste("Some click streams are shorter than ", order, ".", sep="")) }