diff --git a/R/draw-methods.R b/R/draw-methods.R
index 19a3a538..6f510974 100644
--- a/R/draw-methods.R
+++ b/R/draw-methods.R
@@ -940,8 +940,8 @@
plt <- plt +
guides(fill = guide_colourbar(
title = "Partial effect",
- direction = "vertical",
- barheight = grid::unit(0.25, "npc")
+ direction = "vertical"#,
+ #barheight = grid::unit(0.25, "npc")
))
# if isotropic smooth, fix aspect ratio
@@ -1254,8 +1254,8 @@
plt <- plt +
guides(fill = guide_colourbar(
title = "Difference",
- direction = "vertical",
- barheight = grid::unit(0.25, "npc")
+ direction = "vertical"#,
+ #barheight = grid::unit(0.25, "npc")
))
plt
diff --git a/R/smooth-estimates.R b/R/smooth-estimates.R
index 2fd744da..4d5f9743 100644
--- a/R/smooth-estimates.R
+++ b/R/smooth-estimates.R
@@ -1620,8 +1620,8 @@
guides(
fill = guide_colourbar(
title = guide_title,
- direction = "vertical",
- barheight = grid::unit(5, "lines") #grid::unit(0.25, "npc")
+ direction = "vertical"#,
+ #barheight = grid::unit(5, "lines") #grid::unit(0.25, "npc")
),
x = guide_axis(angle = angle)
)
@@ -1765,8 +1765,8 @@
guides(
fill = guide_colourbar(
title = guide_title,
- direction = "vertical",
- barheight = grid::unit(5, "lines") #grid::unit(0.25, "npc")
+ direction = "vertical"#,
+ #barheight = grid::unit(5, "lines") #grid::unit(0.25, "npc")
),
x = guide_axis(angle = angle)
)
@@ -1928,8 +1928,8 @@
guides(
fill = guide_colourbar(
title = guide_title,
- direction = "vertical",
- barheight = grid::unit(5, "lines") #grid::unit(0.25, "npc")
+ direction = "vertical"#,
+ #barheight = grid::unit(5, "lines") #grid::unit(0.25, "npc")
),
x = guide_axis(angle = angle)
)
@@ -2550,8 +2550,8 @@
plt <- plt +
guides(
fill = guide_colourbar(
- title = guide_title, direction = "vertical",
- barheight = grid::unit(5, "lines") #grid::unit(0.25, "npc")
+ title = guide_title, direction = "vertical"#,
+ #barheight = grid::unit(5, "lines") #grid::unit(0.25, "npc")
),
x = guide_axis(angle = angle)
)
@@ -2694,8 +2694,8 @@
guides(
fill = guide_colourbar(
title = guide_title,
- direction = "vertical",
- barheight = grid::unit(5, "lines") #grid::unit(0.25, "npc")
+ direction = "vertical"#,
+ #barheight = grid::unit(5, "lines") #grid::unit(0.25, "npc")
),
x = guide_axis(angle = angle)
)
diff --git a/tests/testthat/_snaps/difference-smooths/draw-difference-smooths-bivariate-gam-contours.svg b/tests/testthat/_snaps/difference-smooths/draw-difference-smooths-bivariate-gam-contours.svg
index b2eed06e..170defc9 100644
--- a/tests/testthat/_snaps/difference-smooths/draw-difference-smooths-bivariate-gam-contours.svg
+++ b/tests/testthat/_snaps/difference-smooths/draw-difference-smooths-bivariate-gam-contours.svg
@@ -101,24 +101,24 @@
1.00
x
z
-
-Difference
-
-
-
+
+Difference
+
+
+
-
-
-
-
+
+
+
+
-
-
--1.0
--0.5
+
+
+-1.0
+-0.5
0.0
-0.5
-1.0
+0.5
+1.0
Comparison:
A
diff --git a/tests/testthat/_snaps/difference-smooths/draw-difference-smooths-bivariate-gam.svg b/tests/testthat/_snaps/difference-smooths/draw-difference-smooths-bivariate-gam.svg
index 36b62c17..167a734d 100644
--- a/tests/testthat/_snaps/difference-smooths/draw-difference-smooths-bivariate-gam.svg
+++ b/tests/testthat/_snaps/difference-smooths/draw-difference-smooths-bivariate-gam.svg
@@ -84,24 +84,24 @@
1.00
x
z
-
-Difference
-
-
-
+
+Difference
+
+
+
-
-
-
-
+
+
+
+
-
-
--1.0
--0.5
+
+
+-1.0
+-0.5
0.0
-0.5
-1.0
+0.5
+1.0
Comparison:
A
diff --git a/tests/testthat/_snaps/draw-methods/draw-smooth-samples-for-bivariate-gam-contours.svg b/tests/testthat/_snaps/draw-methods/draw-smooth-samples-for-bivariate-gam-contours.svg
index 4ddac48a..7a462356 100644
--- a/tests/testthat/_snaps/draw-methods/draw-smooth-samples-for-bivariate-gam-contours.svg
+++ b/tests/testthat/_snaps/draw-methods/draw-smooth-samples-for-bivariate-gam-contours.svg
@@ -178,18 +178,18 @@
0.75
1.00
x
-
-Partial effect
-
-
+
+Partial effect
+
+
-
-
+
+
-
--0.25
+
+-0.25
0.00
-0.25
+0.25
s(x,z)
draw smooth_samples for bivariate GAM contours
diff --git a/tests/testthat/_snaps/draw-methods/draw-smooth-samples-for-gam-m2-rotated.svg b/tests/testthat/_snaps/draw-methods/draw-smooth-samples-for-gam-m2-rotated.svg
index db0ac002..06a983b7 100644
--- a/tests/testthat/_snaps/draw-methods/draw-smooth-samples-for-gam-m2-rotated.svg
+++ b/tests/testthat/_snaps/draw-methods/draw-smooth-samples-for-gam-m2-rotated.svg
@@ -240,18 +240,18 @@
0.75
1.00
x
-
-Partial effect
-
-
+
+Partial effect
+
+
-
-
+
+
-
--0.25
+
+-0.25
0.00
-0.25
+0.25
s(x,z)
draw smooth_samples for GAM m2 rotated
diff --git a/tests/testthat/_snaps/draw-methods/draw-smooth-samples-for-gam-m2.svg b/tests/testthat/_snaps/draw-methods/draw-smooth-samples-for-gam-m2.svg
index 93c280be..1e99dc8e 100644
--- a/tests/testthat/_snaps/draw-methods/draw-smooth-samples-for-gam-m2.svg
+++ b/tests/testthat/_snaps/draw-methods/draw-smooth-samples-for-gam-m2.svg
@@ -240,18 +240,18 @@
0.75
1.00
x
-
-Partial effect
-
-
+
+Partial effect
+
+
-
-
+
+
-
--0.25
+
+-0.25
0.00
-0.25
+0.25
s(x,z)
draw smooth_samples for GAM m2
diff --git a/tests/testthat/_snaps/draw-methods/draw-smooth-samples-for-m2-n-samples.svg b/tests/testthat/_snaps/draw-methods/draw-smooth-samples-for-m2-n-samples.svg
index d79fc1ba..27510cf7 100644
--- a/tests/testthat/_snaps/draw-methods/draw-smooth-samples-for-m2-n-samples.svg
+++ b/tests/testthat/_snaps/draw-methods/draw-smooth-samples-for-m2-n-samples.svg
@@ -150,18 +150,18 @@
0.75
1.00
x
-
-Partial effect
-
-
+
+Partial effect
+
+
-
-
+
+
-
--0.25
+
+-0.25
0.00
-0.25
+0.25
s(x,z)
draw smooth_samples for m2 n_samples