Update canvas_flame.R

koenderks · Oct 7, 2022 · 81e1d09 · 81e1d09
1 parent 8abf71e
commit 81e1d09
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/R/canvas_flame.R b/R/canvas_flame.R
@@ -249,7 +249,7 @@ canvas_flame <- function(colors, background = "#000000",
   ))
 }
 
-.scaleColorChannels <- function(canvas){
+.scaleColorChannels <- function(canvas) {
   hits <- which(canvas[, , 1] > 0)
   scaling <- log(canvas[, , 1][hits]) / canvas[, , 1][hits]
   canvas[, , 2][hits] <- canvas[, , 2][hits] * scaling