OpasnetUtils/Fetch

This page is a method. The page identifier is Op_en5722
Moderator:Nobody (see all) Click here to sign up.
This page is a stub. You may improve it into a full page, and then a rating bar will appear here.
Upload data

Description

fetch downloads a variable.

Code

+ Show code- Hide code # FETCH ##################### fetch downloads a variable. fetch <- function(x, direction = "wide") { # Could think of a version where dependencies table is given as a parameter, and based on Name, Identifier is downloaded from the Base. x <- as.character(x) if(exists(x)) { out <- get(x) } else { out <- tidy(op_baseGetData("opasnet_base", x), direction = "wide") } return(out) }

Alternative

--# : Fetch should take 'dependencies' as argument and download variables to global memory. Fetch2 does that and I move to suggest that we replace fetch with Fetch2 --Teemu R 11:28, 15 June 2012 (EEST)

+ Show code- Hide code # Fetch2 #################### loads all given dependencies to global memory Fetch2 <- function(dependencies, evaluate = FALSE) { for (i in 1:nrow(dependencies)) { if(!exists(dependencies$Name[i])) { objects.get(dependencies$Key[i]) # Key is the R-tools session identifier (seen at the end of the url) if (evaluate) get(dependencies$Name[i])@output <- EvalOutput(get(dependencies$Name[i])) # Eval not necessarily needed at this point } } }

See also

• OpasnetBaseUtils
• Object-oriented programming in Opasnet
• Opasnet (R library)