Merge branch 'master' of gitlab.iric.ca:bioinfo_iric/riricdata

R/IRICData-class.R

@@ -12,9 +12,9 @@
 #' ### IRICData class
 #' ###
 
-require(jsonlite)
-require(data.table)
-require(rvest)
+library(jsonlite)
+library(data.table)
+library(rvest)
 
 IRICData <- setClass(
   # Set the name for the class
@@ -175,7 +175,7 @@ setMethod(
             if (tmp[1] == 'download'){ #annotation files will start with "annotation" isntead of "download"
                 file_id <- tmp[2]
                 resp <- rvest::jump_to(session, paste(url_,'secure/datafiles/json/metadata', file_id, sep='/'))
-                metadata <- fromJSON(rawToChar(resp$response$content))
+                metadata <- jsonlite::fromJSON(rawToChar(resp$response$content))
                 metadata$file_id <- file_id
                 return(metadata)
             }