update

src/util.jl

@@ -198,18 +198,20 @@ function eventdict(;
 end
 
 
-function createTimeline(memory::T1, recent) where {T1<:AbstractVector}
-  totalevents = length(memory)
-  ind =
-    if totalevents > recent
-      start = totalevents - recent
-      start:totalevents
-    else
-      1:totalevents
-    end
+function createTimeline(memory::T1; skiprecent::Integer=0) where {T1<:AbstractVector}
+  # totalevents = length(memory)
+  # ind =
+  #   if totalevents > skiprecent
+  #     start = totalevents - skiprecent
+  #     start:totalevents
+  #   else
+  #     1:totalevents
+  #   end
+
+  events = memory[1:end-skiprecent]
 
   timeline = ""
-  for (i, event) in enumerate(memory[ind])
+  for (i, event) in enumerate(events)
     if event[:outcome] === nothing
       timeline *= "$i) $(event[:subject])> $(event[:actioninput])\n"
     else