R/lastIntActRelease.R

In vitkl/MItools: Protein interaction data tools: retrieving data from IntAct and most other databases using PSICQUIC service

##' last IntAct (all IMEx databases) release
##' @name lastIntActRelease
##' @return character string specifying the year, month, day, and the hour when the IntAct data file was last modified
##' @import data.table
##' @export lastIntActRelease
##'
lastIntActRelease = function(){
  message("... looking for the date of the latest IntAct release ...")
  last_release = fread("ftp://ftp.ebi.ac.uk/pub/databases/intact/current/", showProgress=FALSE)
  last_release = last_release[V9 == "all.zip", paste0(V6,V7)]
  return(paste0(year(Sys.Date()), last_release))
}