Merge pull request #1 from simitpatel/master

sync to master

Author: IronistM

R/speed-insights-package.R

@@ -1,6 +1,3 @@
-library(RJSONIO)
-library(gtools)
-
 #' Speed results for 1 URL
 #'
 #' The speedfinder function returns the Google Page Speed Insights test results for a single URL as a dataframe.
@@ -45,7 +42,7 @@ speedfinder2 <- function(url,strategy,key) {
 #' @export
 speedlist <- function(pagelist,strategy,key) {
   list1 <- lapply(pagelist,speedfinder2,strategy,key)
-  suppressWarnings(do.call("smartbind",list1))
+  suppressWarnings(do.call(gtools::smartbind,list1))
   }