move ComplexHeatmap to imports

DESCRIPTION

@@ -2,7 +2,7 @@ Package: spiralize
 Type: Package
 Title: Visualize Data on Spirals
 Version: 1.1.0
-Date: 2024-06-11
+Date: 2024-06-14
 Authors@R: person("Zuguang", "Gu", email = "[email protected]", role = c("aut", "cre"),
                   comment = c('ORCID'="0000-0002-7395-8709"))
 Depends: R (>= 4.0.0), grid
@@ -13,9 +13,9 @@ Imports: GlobalOptions (>= 0.1.1),
          methods,
          grDevices,
          lubridate,
-         utils
-Suggests: ComplexHeatmap,
-          knitr, 
+         utils,
+         ComplexHeatmap
+Suggests: knitr, 
           rmarkdown,
           grImport,
           grImport2,
@@ -33,7 +33,7 @@ Description: It visualizes data along an Archimedean spiral <https://en.wikipedi
     It has two major advantages for visualization: 1. It is able to visualize data with very long axis with high 
     resolution. 2. It is efficient for time series data to reveal periodic patterns.
 VignetteBuilder: knitr
-URL: https://github.com/jokergoo/spiralize, https://jokergoo.github.io/spiralize
+URL: https://github.com/jokergoo/spiralize, https://jokergoo.github.io/spiralize/
 License: MIT + file LICENSE
 NeedsCompilation: no
 RoxygenNote: 7.3.1

NAMESPACE

@@ -51,6 +51,7 @@ import(GlobalOptions)
 import(grid)
 import(lubridate)
 import(methods)
+import(ComplexHeatmap)
 importFrom(GetoptLong,qq)
 importFrom(GetoptLong,qqcat)
 importFrom(circlize,colorRamp2)

R/dendrogram.R

@@ -1,11 +1,8 @@
 
 #' @importFrom stats is.leaf
+#' @import ComplexHeatmap
 construct_dend_segments = function(dend, gp = gpar()) {
 
-    if(!requireNamespace("ComplexHeatmap")) {
-        stop("You need to install the 'ComplexHeatmap' package from Bioconductor.")
-    }
-
     if(is.null(attr(dend, "x"))) {
         dend = ComplexHeatmap::adjust_dend_by_x(dend)
     }

R/graphics.R

@@ -1229,10 +1229,6 @@ split_vec_by_NA = function(x) {
 horizon_legend = function(lt, title = "", format = "%.2f",
 	template = "[{x1}, {x2}]", ...) {
 
-	if(!requireNamespace("ComplexHeatmap")) {
-        stop("You need to install the 'ComplexHeatmap' package from Bioconductor.")
-    }
-
 	interval = lt$interval
 	col_fun = lt$col_fun