examples pass tests

JohnCoene · Feb 28, 2017 · c722414 · c722414
1 parent 0c84a60
commit c722414
Show file tree

Hide file tree

Showing 5 changed files with 14 additions and 12 deletions.
diff --git a/.Rbuildignore b/.Rbuildignore
@@ -1,7 +1,8 @@
-^.*\.Rproj$
-^\.Rproj\.user$
-^\.httr-oauth$
-^\.travis\.yml$
-^appveyor\.yml$
-^cran-comments\.md$
-^revdep$
+^.*\.Rproj$
+^\.Rproj\.user$
+^\.httr-oauth$
+^\.travis\.yml$
+^appveyor\.yml$
+^cran-comments\.md$
+^revdep$
+^tweets\.RData$
diff --git a/DESCRIPTION b/DESCRIPTION
@@ -1,7 +1,7 @@
 Package: graphTweets
 Type: Package
 Title: Visualise Twitter Interactions
-Version: 0.4.0
+Version: 0.3.2
 Date: 2016-05-07
 Authors@R:
     person("John", "Coene", email = "jcoenep@gmail.com", 
@@ -14,6 +14,7 @@ Depends:
 Imports:
     reshape2,
     dplyr,
+    plyr,
     igraph, 
     methods
 RoxygenNote: 5.0.1

diff --git a/R/dynamize.R b/R/dynamize.R
@@ -117,10 +117,10 @@ dynamise <- function(data, tweets, source, start.stamp, end.stamp = NULL,
 
     names(edges) <- c("source", "target", "start.stamp")
 
-    edges$end.stamp <- max(edges$start.stamp)
-
     edges <- cvstamp(edges, "start.stamp", ssclass)
 
+    edges$end.stamp <- max(edges$start.stamp)
+
   }
 
   # get nodes

diff --git a/R/getNodes.R b/R/getNodes.R
@@ -34,7 +34,7 @@
 #' 
 #' # plot
 #' g <- igraph::graph.data.frame(edges, directed = TRUE, vertices = nodes)
-#' plot(g, vertex.color = igraph::V(g)$favorited)
+#' plot(g)
 #' 
 #' @author John Coene \email{jcoenep@@gmail.com}
 #' 

diff --git a/man/getNodes.Rd b/man/getNodes.Rd