@@ -409,6 +409,7 @@
Loading
409 409
					scale.width <- .25
410 410
				}
411 411
			}
412 +
			if (is.na(scale.text.color)) scale.text.color <- gt$attr.color
412 413
			scale.size <- scale.size * gt$scale
413 414
			scale.lwd <- scale.lwd * gt$scale
414 415
			scale.show <- TRUE

@@ -807,14 +807,15 @@
Loading
807 807
	
808 808
	nc_labels <- nchar(labels)
809 809
	nc_titles <- max(nchar(titles_format))
810 -
	nc_values_format <- do.call(pmax, lapply(values_format, nchar)) + 2 # which space between title and value
811 -
	
810 +
	nc_values_format <- do.call(pmax, c(lapply(values_format, nchar, allowNA = TRUE), list(na.rm = TRUE))) + 2 # which space between title and value
811 +
812 812
	charwidth <- max(nc_labels + nc_titles + nc_values_format)
813 813
	# print(which.max(nc_labels + nc_titles + nc_values_format))
814 814
	attr(x, "charwidth") <- charwidth
815 815
	x
816 816
}
817 817
818 +
818 819
split_alpha_channel <- function(x, alpha) {
819 820
	if (is.null(x)) {
820 821
		list(col=NULL, opacity=0)

@@ -168,7 +168,7 @@
Loading
168 168
		col[is.na(col)] <- g$colorNULL
169 169
		
170 170
		# apply color processing if needed
171 -
		if ((!is.na(g$alpha) && (alpha < 1)) || (gt$pc$sepia.intensity != 0) || (gt$pc$saturation != 1)) {
171 +
		if ((!is.na(g$alpha) && (g$alpha < 1)) || (gt$pc$sepia.intensity != 0) || (gt$pc$saturation != 1)) {
172 172
			ucol <- unique(as.vector(col))
173 173
			ucol2 <- do.call("process_color", c(list(col=ucol, alpha=g$alpha), gt$pc))
174 174
			col[] <- ucol2[match(col, ucol)]
Files Coverage
R 59.08%
Project Totals (79 files) 59.08%
Sunburst
The inner-most circle is the entire project, moving away from the center are folders then, finally, a single file. The size and color of each slice is representing the number of statements and the coverage, respectively.
Icicle
The top section represents the entire project. Proceeding with folders and finally individual files. The size and color of each slice is representing the number of statements and the coverage, respectively.
Grid
Each block represents a single file in the project. The size and color of each block is represented by the number of statements and the coverage, respectively.
Loading