diff --git a/GO.R b/GO.R
index 5b0d1e6..733f922 100644
--- a/GO.R
+++ b/GO.R
@@ -55,7 +55,7 @@ for(itask in 1:task.N){
   writelog(paste('\t', itask, '/', task.N, 'task \t', task.fn), caller = caller)
   
   theTask = readLines(task.fn)
-  theTask = gsub('/home/wwwroot/r', '.', theTask)
+  theTask = gsub('/data/ghdc', '.', theTask)
   writelog(paste('\t', itask, '/', task.N, 'task \t', theTask), caller = caller)
   writelog(paste('\t++++++START++++++:', theTask), caller = caller)
   
diff --git a/functions/getDEM.R b/functions/getDEM.R
index f47fe84..8daa49e 100644
--- a/functions/getDEM.R
+++ b/functions/getDEM.R
@@ -169,7 +169,7 @@ getDEM_MERITHYDRO <- function(fn.wbd,
   fn.demcrop = file.path(dir.out, 'GDEM_crop.tif')
   spx = rgdal::readOGR(fn.wbd)
   ext=extent(spx)
-  cmd= paste('python3 /home/wwwroot/r/python/dem_merit_hydro90.py ', 
+  cmd= paste('python3 /data/ghdc/python/dem_merit_hydro90.py ', 
              floor(ext[1]), ceiling(ext[1]), floor(ext[3]), ceiling(ext[4]), 
              paste0(dir.rawdem, '/'), fn.dem )
   
diff --git a/x.R b/x.R
index 3463a90..a73b5bc 100644
--- a/x.R
+++ b/x.R
@@ -5,7 +5,7 @@
 #' ===============================================================
 
 rm(list=ls())
-setwd('/home/wwwroot/r')
+setwd('/data/ghdc')
 library(rjson)
 library(utils)
 library(rgdal)
@@ -82,7 +82,7 @@ for(itask in task.N:400){
   writelog(paste('\t', itask, '/', task.N, 'task \t', task.fn), caller = caller)
   
   theTask = readLines(task.fn)
-  theTask = gsub('/home/wwwroot/r', '.', theTask)
+  theTask = gsub('/data/ghdc', '.', theTask)
   writelog(paste('\t', itask, '/', task.N, 'task \t', theTask), caller = caller)
   writelog(paste('\t++++++START++++++:', theTask), caller = caller)
   
diff --git a/x1.R b/x1.R
index fb84a0f..d4e224c 100644
--- a/x1.R
+++ b/x1.R
@@ -5,7 +5,7 @@
 #' ===============================================================
 
 rm(list=ls())
-setwd('/home/wwwroot/r')
+setwd('/data/ghdc')
 library(rjson)
 library(utils)
 library(rgdal)
@@ -82,7 +82,7 @@ for(itask in 1:200){
   writelog(paste('\t', itask, '/', task.N, 'task \t', task.fn), caller = caller)
   
   theTask = readLines(task.fn)
-  theTask = gsub('/home/wwwroot/r', '.', theTask)
+  theTask = gsub('/data/ghdc', '.', theTask)
   writelog(paste('\t', itask, '/', task.N, 'task \t', theTask), caller = caller)
   writelog(paste('\t++++++START++++++:', theTask), caller = caller)
   
diff --git a/x2.R b/x2.R
index 8c936ef..2ac83ec 100644
--- a/x2.R
+++ b/x2.R
@@ -5,7 +5,7 @@
 #' ===============================================================
 
 rm(list=ls())
-setwd('/home/wwwroot/r')
+setwd('/data/ghdc')
 library(rjson)
 library(utils)
 library(rgdal)
@@ -82,7 +82,7 @@ for(itask in 201:400){
   writelog(paste('\t', itask, '/', task.N, 'task \t', task.fn), caller = caller)
   
   theTask = readLines(task.fn)
-  theTask = gsub('/home/wwwroot/r', '.', theTask)
+  theTask = gsub('/data/ghdc', '.', theTask)
   writelog(paste('\t', itask, '/', task.N, 'task \t', theTask), caller = caller)
   writelog(paste('\t++++++START++++++:', theTask), caller = caller)
   
diff --git a/x3.R b/x3.R
index 68d8d45..470121d 100644
--- a/x3.R
+++ b/x3.R
@@ -5,7 +5,7 @@
 #' ===============================================================
 
 rm(list=ls())
-setwd('/home/wwwroot/r')
+setwd('/data/ghdc')
 library(rjson)
 library(utils)
 library(rgdal)
@@ -82,7 +82,7 @@ for(itask in 401:task.N){
   writelog(paste('\t', itask, '/', task.N, 'task \t', task.fn), caller = caller)
   
   theTask = readLines(task.fn)
-  theTask = gsub('/home/wwwroot/r', '.', theTask)
+  theTask = gsub('/data/ghdc', '.', theTask)
   writelog(paste('\t', itask, '/', task.N, 'task \t', theTask), caller = caller)
   writelog(paste('\t++++++START++++++:', theTask), caller = caller)