clone(x) for #60

SymbolixAU · Jan 22, 2020 · e835a4b · e835a4b
1 parent ef91574
commit e835a4b
Show file tree

Hide file tree

Showing 4 changed files with 152 additions and 49 deletions.
diff --git a/DESCRIPTION b/DESCRIPTION
@@ -1,7 +1,7 @@
 Package: colourvalues
 Type: Package
 Title: Assigns Colours to Values
-Version: 0.3.1001
+Version: 0.3.1002
 Date: 2019-11-15
 Authors@R: c(
     person("David", "Cooley", ,"dcooley@symbolix.com.au", role = c("aut", "cre"))
@@ -24,7 +24,7 @@ LinkingTo:
 Imports:
     graphics,
     Rcpp
-RoxygenNote: 6.1.1
+RoxygenNote: 7.0.2
 Suggests: 
     covr,
     microbenchmark,

diff --git a/inst/include/colourvalues/api/api_hex.hpp b/inst/include/colourvalues/api/api_hex.hpp
@@ -304,7 +304,8 @@ namespace api {
     }
     }
     case REALSXP: {
-      Rcpp::NumericVector nv = Rcpp::as< Rcpp::NumericVector >( x );
+      //Rcpp::NumericVector nv = Rcpp::as< Rcpp::NumericVector >( x );
+      Rcpp::NumericVector nv = Rcpp::clone(x);
       return colourvalues::colours_hex::colour_value_hex(
         nv, palette, na_colour, include_alpha, format_type, n_summaries, format, digits
       );

diff --git a/man/colour_values.Rd b/man/colour_values.Rd
diff --git a/man/colour_values_rgb.Rd b/man/colour_values_rgb.Rd