rbbt-marq 1.0.4 → 1.0.5
Sign up to get free protection for your applications and to get access to all the features.
- data/R/GEO.R +4 -0
- metadata +1 -1
data/R/GEO.R
CHANGED
|
@@ -35,6 +35,10 @@ GEO.values <- function(data){
|
|
|
35
35
|
|
|
36
36
|
|
|
37
37
|
GEO.get <- function(name, cachedir = NULL){
|
|
38
|
+
if (is.null(cachedir) && exists('MARQ.config')){
|
|
39
|
+
cachedir = paste(MARQ.config$cachedir, 'GEO', sep="/");
|
|
40
|
+
}
|
|
41
|
+
|
|
38
42
|
if (is.null(cachedir)){
|
|
39
43
|
object <- getGEO(name);
|
|
40
44
|
}else{
|