Add reference on man

Author: bthieurmel

DESCRIPTION

@@ -1,7 +1,7 @@
 Package: visNetwork
 Title: Network Visualization using 'vis.js' Library
 Version: 1.0.2
-Date: 2016-09-14
+Date: 2016-10-05
 Authors@R: c(
     person(family = "Almende B.V.", role = c("aut", "cph"),
        comment = "vis.js library in htmlwidgets/lib, http://visjs.org, http://www.almende.com/home"),

R/visConfigure.R

@@ -22,6 +22,8 @@
 #'\link{visPhysics} for control physics, \link{visInteraction} for interaction, \link{visNetworkProxy} & \link{visFocus} & \link{visFit} for animation within shiny,
 #'\link{visDocumentation}, \link{visEvents}, \link{visConfigure} ...
 #'
+#'@references See online documentation \url{http://datastorm-open.github.io/visNetwork/}
+#'
 #' @export
 visConfigure <- function(graph,
                          enabled = NULL,

R/visDocumentation.R

@@ -21,6 +21,8 @@
 #'
 #' @export
 #' @importFrom  utils browseURL
+#' @references See online documentation \url{http://datastorm-open.github.io/visNetwork/}
+#'
 visDocumentation <- function(viewer = getOption("viewer")){
   if (!is.null(viewer)){
     tempDir <- tempdir()

R/visEdges.R

@@ -137,7 +137,7 @@
 #' visNetwork(nodes, edges)
 #' 
 #' @export
-
+#' @references See online documentation \url{http://datastorm-open.github.io/visNetwork/}
 visEdges <- function(graph,
                      title = NULL,
                      value = NULL,

R/visExport.R

@@ -34,7 +34,7 @@
 #'\link{visDocumentation}, \link{visEvents}, \link{visConfigure} ...
 #'
 #'@export
-
+#'@references See online documentation \url{http://datastorm-open.github.io/visNetwork/}
 visExport <- function(graph, type = "png", name = "network",
                          label = paste0("Export as ", type),
                          background = "#fff", float = "right", 

R/visFit.R

@@ -22,7 +22,7 @@
 #'}
 #'
 #'@export
-
+#'@references See online documentation \url{http://datastorm-open.github.io/visNetwork/}
 visFit <- function(graph, nodes = NULL,
                      animation = list(duration = 1500, easingFunction = "easeInOutQuad")){
 

R/visFocus.R

@@ -25,7 +25,7 @@
 #'}
 #'
 #'@export
-
+#'@references See online documentation \url{http://datastorm-open.github.io/visNetwork/}
 visFocus <- function(graph, id, scale =  2,
                      offset =  list(x = 0, y = 0),
                      locked = TRUE,

R/visGetEdges.R

@@ -19,7 +19,7 @@
 #'}
 #'
 #'@export
-
+#'@references See online documentation \url{http://datastorm-open.github.io/visNetwork/}
 visGetEdges <- function(graph, input = paste0(graph$id, "_edges")){
 
   if(!any(class(graph) %in% "visNetwork_Proxy")){

R/visGetNodes.R

@@ -19,7 +19,7 @@
 #'}
 #'
 #'@export
-
+#'@references See online documentation \url{http://datastorm-open.github.io/visNetwork/}
 visGetNodes <- function(graph, input = paste0(graph$id, "_nodes")){
 
   if(!any(class(graph) %in% "visNetwork_Proxy")){

R/visGetPositions.R

@@ -20,7 +20,7 @@
 #'}
 #'
 #'@export
-
+#'@references See online documentation \url{http://datastorm-open.github.io/visNetwork/}
 visGetPositions <- function(graph, nodes = NULL, input = paste0(graph$id, "_positions")){
 
   if(!any(class(graph) %in% "visNetwork_Proxy")){