Skip to main content

Browse the archive

https://github.com/DIPnet/fimsR-access
05 April 2024, 20:27:40 UTC
Revision 5676a73b75947b18009e9cbfca32c2131b409146 authored by John Deck on 05 August 2015, 05:54:32 UTC, committed by John Deck on 05 August 2015, 05:54:32 UTC 
Rename fimsUtils.R to userUtils.R
1 parent 1fd07e1
Raw File
Tip revision: 5676a73b75947b18009e9cbfca32c2131b409146 authored by John Deck on 05 August 2015, 05:54:32 UTC
Rename fimsUtils.R to userUtils.R
Tip revision: 5676a73
getFIMSGraph.R 
#!/usr/bin/env Rscript

# Make sure RCurl package is loaded
library(RCurl)

# Function to fetch FIMS data from service using ARK Identifier
# Uses RCurl (libcurl) to fetch so we can follow re-directs
# assumes there is a header and it is tab delimited
graphData <- function(url) {
  return (read.delim(textConnection(getURLContent(url,followLocation=TRUE)),header=TRUE,sep="\t"))
}
back to top