version 1.3-0

DESCRIPTION

@@ -1,23 +1,24 @@
 Package: arulesViz
-Version: 1.2-1
-Date: 2017-03-12
+Version: 1.3-0
+Date: 2017-09-07
 Title: Visualizing Association Rules and Frequent Itemsets
 Authors@R: c(person("Michael", "Hahsler", role = c("aut", "cre", "cph"),
                 email = "mhahsler@lyle.smu.edu"),
             person("Sudheer", "Chelluboina", role = c("ctb")))
 Depends: arules (>= 1.4.1), grid
 Imports: scatterplot3d, vcd, seriation, igraph (>= 1.0.0), graphics,
-        methods, utils, grDevices, stats, colorspace, DT, plotly
+        methods, utils, grDevices, stats, colorspace, DT, plotly,
+        visNetwork
 Suggests: graph, Rgraphviz, iplots
 Description: Extends package arules with various visualization techniques for association rules and itemsets. The package also includes several interactive visualizations for rule exploration.
 License: GPL-3
 URL: http://lyle.smu.edu/IDA/arules/
 BugReports: https://github.com/mhahsler/arulesViz
 Copyright: (C) 2011 Michael Hahsler and Sudheer Chelluboina
 NeedsCompilation: no
-Packaged: 2017-03-12 23:48:03 UTC; hahsler
+Packaged: 2017-09-09 17:43:35 UTC; hahsler
 Author: Michael Hahsler [aut, cre, cph],
   Sudheer Chelluboina [ctb]
 Maintainer: Michael Hahsler <mhahsler@lyle.smu.edu>
 Repository: CRAN
-Date/Publication: 2017-03-13 17:18:51
+Date/Publication: 2017-09-09 21:54:13 UTC

MD5

@@ -1,33 +1,34 @@
-5e98998e1fb250709724059d1c84a245 *DESCRIPTION
-e06422c866e3e22e5aae53c6725e491a *NAMESPACE
-9dfa3e977dc7546d73a641ec9f6aef1b *NEWS.md
+227d692904652de4bcba2af1042373a1 *DESCRIPTION
+39e1155113b720062b5f6e0f7d46e9ee *NAMESPACE
+b72f57c5bfcbac7e3fa1518560d9e5ed *NEWS.md
 fe4b14aa848fc5b991e985849c7fcbee *R/AAAhelpers.R
-298f6bad9275ba5cc81e302804dd611a *R/AAAparameter.R
-91878a88918238bf8535a1909521abb7 *R/doubledecker.R
+45dcb72f82c47b27fc6ced5fb5a985c4 *R/AAAparameter.R
+978268bd0cc6cf3cc871beb7f4c7f583 *R/doubledecker.R
 c51a094dae34cc5d475d01e0145403f3 *R/gInteraction.R
 5c372b65bd0a29dc038788cf03977227 *R/gPlots.R
-6e932634847d9cfa833064035bd60aaa *R/graph.R
-7cbfe25ffa3b24ba6f90e56b8cd7f5df *R/groupedmatrix.R
+2d2fce836b2d591869265f0c3d8822ab *R/graph.R
+59f49464ec00b5120f0d026beec31342 *R/groupedmatrix.R
 55305f56db01e1afa2ca8d3099771046 *R/inspectDT.R
 899a4c584ee37bcba1f42c278a75a696 *R/iplot.R
 9e49f48c7706d0c5621630f3182850e3 *R/map.R
-c23415836e5599534c27c3618da312d5 *R/matrix.R
-9f7f05e7ea14061b63550533285aecda *R/paracoord.R
-22f58e2acead71c45a579216b17cf89f *R/plot.R
-2adef70a3db271ef0b3b58aad64577b2 *R/plotly.R
-a67f5f529c944f272f4e98c961e77aff *R/save.R
-105f96309a28a52870c7eea6924aa61f *R/scatterplot.R
-acb1eb688dd4f019022668d7590edb34 *README.md
-5a8f543d6b3d70138b9a425dba534668 *build/vignette.rds
-e6339183e0487a12488b474d40c7cfb3 *inst/doc/arulesViz.R
-b5cfa31182ce879e05b97b5ac33d6017 *inst/doc/arulesViz.Rnw
-ce55f39644d3e471ee0d784f573c57f2 *inst/doc/arulesViz.pdf
+7229822e5512b88ff09699838e275de3 *R/matrix.R
+926dd393b8d4243c9ca3e37e85fc06c6 *R/paracoord.R
+3866fd29ffac10dfbe54d24a5b30349b *R/plot.R
+90949359dd52635e481f8c6a5df0bac9 *R/plotly.R
+0cab64f92f96c00bd9e49268a7070d15 *R/save.R
+b8088aeead7b672f5fa1507d893d6793 *R/scatterplot.R
+56e35338a8ae2f92aa1058754f1efad3 *R/visNetwork.R
+c1e7301d1bff3c3afd4526b336e53a5d *README.md
+00572e70b2454c1d5ac27072aeb04dbe *build/vignette.rds
+62626fa37e36b3a78bc5c29c41c22bfe *inst/doc/arulesViz.R
+f1f14e3900267c19d02c050eac206fd2 *inst/doc/arulesViz.Rnw
+d66a884e60921368f065653bc6eaef8d *inst/doc/arulesViz.pdf
 29085f12854583489d65c44d421472d7 *man/inspectDT.Rd
-c0e58a7870fd93e54064d8aa123e1f66 *man/plot.Rd
-cdb3011570321b3b3442facc34839be5 *man/plotly_arules.Rd
+1b87c7b6c0a823e5f3260247cd7ed86f *man/plot.Rd
+d551d12fc69bc3764d271d143419a092 *man/plotly_arules.Rd
 71e4712a66ede2394e110d2e79894cc5 *man/save.Rd
 53d9b6775edf3068f77eb3f8b8a63f16 *vignettes/arules.bib
-b5cfa31182ce879e05b97b5ac33d6017 *vignettes/arulesViz.Rnw
+f1f14e3900267c19d02c050eac206fd2 *vignettes/arulesViz.Rnw
 0ac93cfdc7bb8263cfd796df764abb90 *vignettes/arulesViz.bib
 8d5a5924226335497dbf2896a0a4272e *vignettes/gephi_1.pdf
 4f38f845e71f8ef972bdac45c574c4e4 *vignettes/scatterplot_interactive.png

NAMESPACE

@@ -3,7 +3,7 @@ import("arules")
 importFrom("graphics", "par", "plot", "mtext", "text", "axis", "box")
 importFrom("stats", "median", "kmeans", "cutree", "dist", "hclust", "na.omit")
 importFrom("grDevices", "hcl", "rgb", "gray.colors", "gray", "col2rgb", 
-  "colorRampPalette")
+  "colorRampPalette", "rainbow")
 importFrom("methods", "is", "as", "new")
 importFrom("utils", "installed.packages")
 import("grid") ### need to use as depends in DESCRIPTION because of vcd
@@ -15,6 +15,8 @@ importFrom("vcd", "mosaic", "doubledecker")
 importFrom("colorspace", "heat_hcl", "sequential_hcl")
 importFrom("DT", "datatable", "%>%", "formatRound")
 importFrom("plotly", "plot_ly", "layout")
+importFrom("visNetwork", "visNetwork", "visIgraphLayout", 
+  "visOptions", "visNodes")
 
 export("saveAsGraph")
 

NEWS.md

@@ -1,14 +1,39 @@
+# arulesViz 1.3-0 (09/07/2017)
+
+## New features
+* Introduced engine parameter for plot which can be used to create htmlWidgets.
+    Matrices and scatterplots use plotly and graphs are plotted 
+    using visNetwork.
+
+## Changes
+* Some work was done on unifying the interface for plot more resulting in a
+    slightly changed order of parameters.
+* Parameter interactive is now deprecated and will be removed in future
+    releases. Use engine = "interactive" or engine = "htmlWidget" 
+    (where available).
+* matrix-based visualization: reordering now tries to order by measure of 
+  interestingness. The plot now uses shading instead of measure.
+* method graph does not support type anymore. Only items are now supported as 
+  vertices.
+
+## Bug Fix
+* Fixed item labels order in reordered parallel coordinates plot 
+    (reported by Yvi24).
+
+
 # arulesViz 1.2-1 (03/12/2017)
 
-* arules_plotly uses now signif instead of round for quality measures. 
-* arules_plotly shows correct rule indices for too large rule sets. 
-* arules_plotly implements now jitter to reduce overplotting (defaults
-    to .1 if overplotting would occur)
-* regular scatter plot also defaults jitter to .2 if overplotting would occur.
+## New features
+
 * plot method "grouped" now shows the most interesting items instead of the
   most frequent items to represent antecedents. Also, if more than 10 RHS
   items are found, then only the 10 most important are shown (see control 
-  argument rhs_max)
+  argument rhs_max).
+* arules_plotly uses now signif instead of round for quality measures. 
+* arules_plotly implements now jitter to reduce overplotting (defaults
+    to .1 if overplotting would occur).
+* arules_plotly shows correct rule indices for too large rule sets. 
+* scatterplot also defaults jitter to .2 if overplotting would occur.
 * scatterplot now handles Inf with a warning.
 
 # arulesViz 1.2-0 (10/02/2016)

R/AAAparameter.R

@@ -21,7 +21,7 @@
 .nodots <- function(...) {
   l <- list(...)
   if(length(l) > 0L) warning("Unknown arguments: ",
-    paste(names(l), "=",l, collapse=", "))
+    paste(names(l), "=",l, collapse=", "), call. = FALSE)
 }
 
 .get_parameters <- function(parameter, defaults) {

R/doubledecker.R

@@ -19,26 +19,36 @@
 
 doubledecker_arules <- function(rules, measure ="support", data, 
 	control=list(), ...) {
+
+  if(pmatch(control$engine, c("default"), nomatch = 0) != 1) 
+    stop("Unknown engine for scatterplot: '", control$engine, 
+      "' Valid engines: 'default'.")
+
+  if(length(rules) != 1) stop("only can visualize one rule.")
+  if(is.null(data)) stop("data has to be specified, but is missing.")
+
+  control <- c(control, list(...))
+
+  control <- .get_parameters(control, list(
+    main = "Doubledecker plot for 1 rule",
+    type = "doubledecker",
+    engine = "default",
+    interactive = FALSE,
+    plot_options = list()
+  ))
+
+  if(control$interactive) stop("No interactive visualization available for doubledecker/mosaic plot.")
 
-    if(length(rules) != 1) stop("only can visualize one rule.")
-    if(is.null(data)) stop("Data missing.")
-
-    control <- .get_parameters(control, list(
-		    main = "Doubledecker plot for 1 rule",
-		    type = "doubledecker",
-		    interactive = FALSE
-		    ))
-
-    table <- getTable(rules, data)
-
-    if(control$type=="doubledecker")
-    doubledecker(table, margins=c(2,8,length(dim(table) + 2), 2), 
-	    main = control$main, ...) 
-    else {
+  table <- getTable(rules, data)
+
+  if(control$type=="doubledecker")
+    do.call(doubledecker, c(list(table, margins=c(2,8,length(dim(table) + 2), 2), 
+      main = control$main), control$plot_options)) 
+  else {
     control$main <- "Mosaic plot for 1 rule"
-    mosaic(table, highlighting = length(dim(table)),
-            main = control$main, ...)
-    }
+    do.call(mosaic, c(list(table, highlighting = length(dim(table)),
+      main = control$main), control$plot_options))
+  }
 }