N_int to fix tests_preview_facet.png

tdhock · Sep 28, 2024 · 4fbe57b · 4fbe57b
1 parent cc51a0b
commit 4fbe57b
Show file tree

Hide file tree

Showing 3 changed files with 6 additions and 2 deletions.
diff --git a/DESCRIPTION b/DESCRIPTION
@@ -1,7 +1,7 @@
 Package: atime
 Type: Package
 Title: Asymptotic Timing
-Version: 2024.9.25
+Version: 2024.9.27
 Authors@R: c(
     person("Toby", "Hocking",
      email="[email protected]",

diff --git a/NEWS b/NEWS
@@ -1,3 +1,7 @@
+Changes in version 2024.9.27
+
+- atime_pkg tests_preview_facet.png width fixed/smaller (was same as width of tests_all_facet.png).
+
 Changes in version 2024.9.25
 
 - atime_pkg creates tests_preview_facet.png if N.tests.preview (default 4, can be defined in atime/tests.R) is less than the number of test cases. It should be informative even when zoomed out, since it shows only the test cases which had smallest p-values (most significant differences between HEAD and min). Recommended for display as thumbnail/preview image with links to the larger tests_preview_all.png that includes all test results (which may not be readable/informative unless you zoom/scroll, if there are 10+ tests).

diff --git a/R/test.R b/R/test.R
@@ -167,7 +167,7 @@ atime_pkg <- function(pkg.path=".", tests.dir=NULL){
       sprintf("tests_%s_facet.png", N_name))
     grDevices::png(
       out.png,
-      width=test.info$width.in*N.tests,
+      width=test.info$width.in*N_int,
       height=test.info$height.in,
       units="in",
       res=100)