`heatmapCodex`: ERROR while rich displaying an object: Error in grid.Call.graphics(C_downvppath, name$path, name$name, strict): Viewport 'Norm. Enrichment -log10(P-adj) [0-Max]_heatmap_body_1_1' was not found

[danli349]

Hello:

projHeme5 <- addArchRAnnotations(ArchRProj = projHeme5, 
                                 db = "LOLA",
                                 collection = "Codex")

enrichCodex <- peakAnnoEnrichment(
    seMarker = markersPeaks,
    ArchRProj = projHeme5,
    peakAnnotation = "EncodeTFBS",
    cutOff = "FDR <= 0.1 & Log2FC >= 0.5"
  )

heatmapCodex <- plotEnrichHeatmap(enrichCodex, n = 7,
                                  transpose = TRUE)

heatmapCodex 

How should I solve this problem?

Error in grid.Call.graphics(C_downvppath, name$path, name$name, strict): Viewport 'Norm. Enrichment -log10(P-adj) [0-Max]_heatmap_body_1_1' was not found
Traceback:

1. ComplexHeatmap::draw(heatmapCodex, heatmap_legend_side = "bot", 
 .     annotation_legend_side = "bot")
2. .local(object, ...)
3. draw(ht_list, ...)
4. draw(ht_list, ...)
5. .local(object, ...)
6. grid.draw(p)
7. grid.draw.gTree(p)
8. recordGraphics(drawGTree(x), list(x = x), getNamespace("grid"))
9. drawGTree(x)
10. grid.draw(x$children[[i]], recording = FALSE)
11. grid.draw.grob(x$children[[i]], recording = FALSE)
12. recordGraphics(drawGrob(x), list(x = x), getNamespace("grid"))
13. drawGrob(x)
14. preDraw(x)
15. preDraw.grob(x)
16. pushvpgp(x)
17. pushgrobvp(x$vp)
18. pushgrobvp.vpPath(x$vp)
19. downViewport(vp, strict = TRUE, recording = FALSE)
20. downViewport.vpPath(vp, strict = TRUE, recording = FALSE)
21. grid.Call.graphics(C_downvppath, name$path, name$name, strict)
22. .handleSimpleError(function (cnd) 
  . {
  .     watcher$capture_plot_and_output()
  .     cnd <- sanitize_call(cnd)
  .     watcher$push(cnd)
  .     switch(on_error, continue = invokeRestart("eval_continue"), 
  .         stop = invokeRestart("eval_stop"), error = invokeRestart("eval_error", 
  .             cnd))
  . }, "Viewport 'Norm. Enrichment -log10(P-adj) [0-Max]_heatmap_body_1_1' was not found", 
  .     base::quote(grid.Call.graphics(C_downvppath, name$path, name$name, 
  .         strict)))