OpasnetUtils/Opasnet.data: Difference between revisions

From Opasnet
Jump to navigation Jump to search
mNo edit summary
mNo edit summary
 
(One intermediate revision by the same user not shown)
Line 9: Line 9:
==Parameters==
==Parameters==
* filename is the URL without the first part (see below), wiki is "opasnet_en", "opasnet_fi", or "M-files".
* filename is the URL without the first part (see below), wiki is "opasnet_en", "opasnet_fi", or "M-files".
* If table is TRUE then a table file for read.table function is assumed; all other parameters are for this read.table function.
* For reading files, use '''opasnet.data'''. For reading csv files as data.frames, use '''opasnet.csv'''.


==Parameters==
==Parameters==


==Code==
==Code==
<rcode
name="answer"
label="Initiate functions"
graphics="1"
showcode="1"
>
# OPASNET.DATA #####################################
## opasnet.data downloads a file from Finnish Opasnet wiki, English Opasnet wiki, or Opasnet File.
## Parameters: filename is the URL without the first part (see below), wiki is "opasnet_en", "opasnet_fi", or "M-files".
## If table is TRUE then a table file for read.table function is assumed; all other parameters are for this read.table function.


opasnet.data <- function(filename, wiki = "opasnet_en", table = FALSE, ...)
https://www.opasnet.org/svn/opasnet_utils/trunk/R/opasnet.R
{
if (wiki == "opasnet_en")
{
file <- paste("http://en.opasnet.org/en-opwiki/images/", filename, sep = "")
}
if (wiki == "opasnet_fi")
{
file <- paste("http://fi.opasnet.org/fi_wiki/images/", filename, sep = "")
}
if (wiki == "M-files")
{
file <- paste("http://http://fi.opasnet.org/fi_wiki/extensions/mfiles/", filename, sep = "")
}
 
#if(table == TRUE) {
#file <- re#ad.table(file, header = FALSE, sep = "", quote = "\"'",
#          dec = ".", row.names, col.names,
#          as.is = !stringsAsFactors,
#          na.strings = "NA", colClasses = NA, nrows = -1,
#          skip = 0, check.names = TRUE, fill = !blank.lines.skip,
#          strip.white = FALSE, blank.lines.skip = TRUE,
#          comment.char = "#",
#          allowEscapes = FALSE, flush = FALSE,
#          stringsAsFactors = default.stringsAsFactors(),
#          fileEncoding = "", encoding = "unknown")
#return(file)
#}
#else {return(ge#tURL(file))}
}
 
</rcode>


==See also==
==See also==

Latest revision as of 23:10, 5 November 2012



Description

opasnet.data downloads a file from Finnish Opasnet wiki, English Opasnet wiki, or Opasnet File.

Parameters

  • filename is the URL without the first part (see below), wiki is "opasnet_en", "opasnet_fi", or "M-files".
  • For reading files, use opasnet.data. For reading csv files as data.frames, use opasnet.csv.

Parameters

Code

https://www.opasnet.org/svn/opasnet_utils/trunk/R/opasnet.R

See also

Retrieved from "https://en.opasnet.org/index.php?title=OpasnetUtils/Opasnet.data&oldid=26663"