From 32ac272c8a7227d73e2cc6ec1a38320ab2037063 Mon Sep 17 00:00:00 2001 From: Eric Ihli Date: Thu, 1 Jul 2021 06:59:00 -0500 Subject: [PATCH] Fix missing symbol --- src/com/owoga/corpus/markov.clj | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) diff --git a/src/com/owoga/corpus/markov.clj b/src/com/owoga/corpus/markov.clj index c868d81..510984b 100644 --- a/src/com/owoga/corpus/markov.clj +++ b/src/com/owoga/corpus/markov.clj @@ -1143,7 +1143,8 @@ (defn mle [model lookup] - (let [[parent freq] (lookup-with-backoff model lookup) + (let [N (calc-N model) + [parent freq] (lookup-with-backoff model lookup) [_ parent-freq] (get parent [] [nil N])] [freq parent-freq]))