First test version of factorize

to check encoding problem

Author: Almond-S

R/factorize

@@ -0,0 +1,7 @@
+#' Factorize tensor product effect
+#'
+#' @export
+
+factorize <- factorise <- function(x, ...) {
+  UseMethod("factorize")
+}