Avoiding rounding ambiguity in test

Author: jonclayden

tests/testthat/test-15-properties.R

@@ -15,7 +15,7 @@ test_that("colour properties can be manipulated", {
     expect_equal(hue("red",delta(240)), shade("#0000FF"), hexonly=TRUE)
     expect_equal(hue("blue",delta(240)), shade("#00FF00"), hexonly=TRUE)
     expect_equal(lightness("red",scalefac(0.5)), shade("#A60000"), hexonly=TRUE)
-    expect_equal(brightness("red",scalefac(0.3,0.5)), c("#4D0000","#800000"), hexonly=TRUE)
+    expect_equal(brightness("red",scalefac(0.4,0.6)), c("#660000","#990000"), hexonly=TRUE)
     expect_equivalent(coords(brightness("grey40",c(0.2,0.6))), matrix(c(0,0,0,0,0.2,0.6),nrow=2))
 })