setTimeout在所有函数调用完成后运行

Question

我想创建一个项目，在其中使用回溯找到迷宫中从（0,0）到（m-1，n-1）的所有可能路径。我想使用javascript来可视化它。
我创建了一个带有灰色正方形的网格，我们可以在上面移动，黑色正方形是障碍。
我为此创建了递归函数。
现在，当我访问每个正方形时，我将为其着色和取消着色，但是我想添加一些延迟，以便我们可以看到它的发生。

我尝试了setTimeout（），sleep（），但似乎没有任何效果。 当我在控制台中使用settimeout时，将打印所有路径，然后一段时间后，将打印所有sleep！s消息。
必须逐行打印它们。
我可以知道该怎么做吗？

获取路径的功能是

library(dplyr)

df %>%
  distinct(ID, String) %>%
  mutate(new_string = ifelse(String == 'JKLMNOP', lag(String), String)) %>%
  left_join(df, by = c('ID', 'String'))

#  ID  String new_string DATE
#1  1  ABCDEF     ABCDEF 9/19
#2  1  ABCDEF     ABCDEF 9/18
#3  1  ABCDEF     ABCDEF 9/17
#4  1 JKLMNOP     ABCDEF 9/16
#5  1 JKLMNOP     ABCDEF 9/15
#6  1 JKLMNOP     ABCDEF 9/14

VIEW WHOLE CODE HERE