hugomflavio / actel
Showing 1 of 2 files from the diff.
Other files ignored by Codecov
NEWS.md has changed.

@@ -431,7 +431,7 @@
Loading
431 431
  p <- p + ggplot2::facet_grid(. ~ variable, scales = "free_x")
432 432
  p <- p + ggplot2::theme(axis.text.x = ggplot2::element_text(angle = 45, vjust = 1, hjust = 1))
433 433
  p <- p + ggplot2::labs(x = "", y = "")
434 -
  ggplot2::ggsave(paste0(tempdir(), "/actel_report_auxiliary_files/dotplots.png"), width = 6, height = (1.3 + 0.115 * (nrow(t2) - 1)))
434 +
  ggplot2::ggsave(paste0(tempdir(), "/actel_report_auxiliary_files/dotplots.png"), width = 6, height = (1.3 + 0.115 * (nrow(t2) - 1)), limitsize = FALSE)
435 435
  appendTo("debug", "Terminating printDotplots.")
436 436
}
437 437
@@ -483,7 +483,7 @@
Loading
483 483
  p <- p + ggplot2::scale_y_continuous(limits = c(0, 1), expand = c(0, 0, 0.05, 0))
484 484
  p <- p + ggplot2::labs(x = "", y = "Survival")
485 485
  the.width <- max(2, sum(grepl("Disap.", colnames(section.overview))) * nrow(section.overview))
486 -
  ggplot2::ggsave(paste0(tempdir(), "/actel_report_auxiliary_files/survival.png"), width = the.width, height = 4)
486 +
  ggplot2::ggsave(paste0(tempdir(), "/actel_report_auxiliary_files/survival.png"), width = the.width, height = 4, limitsize = FALSE)
487 487
  appendTo("debug", "Terminating printSurvivalGraphic.")
488 488
}
489 489
@@ -704,7 +704,7 @@
Loading
704 704
      }
705 705
    }
706 706
    # Save
707 -
    ggplot2::ggsave(paste0(tempdir(), "/actel_report_auxiliary_files/", tag, ".", extension), width = the.width, height = the.height)  # better to save in png to avoid point overlapping issues
707 +
    ggplot2::ggsave(paste0(tempdir(), "/actel_report_auxiliary_files/", tag, ".", extension), width = the.width, height = the.height, limitsize = FALSE)  # better to save in png to avoid point overlapping issues
708 708
709 709
    if (counter %% 2 == 0) {
710 710
      individual.plots <<- paste0(individual.plots, "![](", tempdir(), "/actel_report_auxiliary_files/", tag, ".", extension, "){ width=", the.width * 10, "% }\n")
@@ -1271,7 +1271,7 @@
Loading
1271 1271
      p <- p + ggplot2::scale_fill_manual(values = as.vector(cbPalette)[1:length(unique(plotdata$Group))], drop = FALSE)
1272 1272
    }
1273 1273
  
1274 -
    ggplot2::ggsave(paste0(tempdir(), "/actel_report_auxiliary_files/", i,"_days.png"), width = 10, height = length(unique(plotdata$variable)) * 2)
1274 +
    ggplot2::ggsave(paste0(tempdir(), "/actel_report_auxiliary_files/", i,"_days.png"), width = 10, height = length(unique(plotdata$variable)) * 2, limitsize = FALSE)
1275 1275
  })
1276 1276
}
1277 1277
@@ -1377,7 +1377,7 @@
Loading
1377 1377
  p <- p + ggplot2::labs(x = "", y = "n")
1378 1378
  p <- p + ggplot2::scale_y_continuous(expand = c(0, 0, 0.05, 0))
1379 1379
  the.width <- max(2, (ncol(input) - 1) * nrow(input) * 0.7)
1380 -
  ggplot2::ggsave(paste0(tempdir(), "/actel_report_auxiliary_files/last_section.png"), width = the.width, height = 4)
1380 +
  ggplot2::ggsave(paste0(tempdir(), "/actel_report_auxiliary_files/last_section.png"), width = the.width, height = 4, limitsize = FALSE)
1381 1381
}
1382 1382
1383 1383
#' Print a simple barplot with the number of tags last seen at each section
@@ -1409,7 +1409,7 @@
Loading
1409 1409
  p <- p + ggplot2::coord_flip()
1410 1410
  p <- p + ggplot2::guides(fill = ggplot2::guide_legend(reverse = TRUE))
1411 1411
  the.height <- max(2, ((length(levels(status.df$Very.last.array)) - 1) * 0.5))
1412 -
  ggplot2::ggsave(paste0(tempdir(), "/actel_report_auxiliary_files/last_arrays.png"), width = 6, height = the.height)
1412 +
  ggplot2::ggsave(paste0(tempdir(), "/actel_report_auxiliary_files/last_arrays.png"), width = 6, height = the.height, limitsize = FALSE)
1413 1413
}
1414 1414
1415 1415
#' Print sensor data for each individual tag
@@ -1488,7 +1488,7 @@
Loading
1488 1488
      }
1489 1489
1490 1490
      # Save
1491 -
      ggplot2::ggsave(paste0(tempdir(), "/actel_report_auxiliary_files/", tag, "_sensors.", extension), width = the.width, height = the.height)  # better to save in png to avoid point overlapping issues
1491 +
      ggplot2::ggsave(paste0(tempdir(), "/actel_report_auxiliary_files/", tag, "_sensors.", extension), width = the.width, height = the.height, limitsize = FALSE)  # better to save in png to avoid point overlapping issues
1492 1492
1493 1493
      n.plots <- n.plots + 1
1494 1494
      if (n.plots %% 2 == 0) {
Files Coverage
R 93.12%
Project Totals (15 files) 93.12%
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