Issue plotting Heatmap

[ccruizm]

Good day,

Following the tutorial for visualization the outputs from chromVAR, I have found an issue when plotting a heatmap of the sample correlation. Below the error:

Error in `[[<-`(`*tmp*`, i, value = logical(0)): 0 elements in value to replace 36 elements
Traceback:

1. pheatmap(as.dist(sample_cor), annotation_row = colData(dev), 
 .     clustering_distance_rows = as.dist(1 - sample_cor), clustering_distance_cols = as.dist(1 - 
 .         sample_cor))
2. generate_annotation_colours(annotation, annotation_colors, drop = drop_levels)
3. `[[<-`(`*tmp*`, i, value = logical(0))
4. `[[<-`(`*tmp*`, i, value = logical(0))
5. stop(paste(lv, "elements in value to replace", nrx, "elements"))

What do you think might be the issue here?

Thanks in advance