2013-02-06 42 views
0

我一直在這段代碼工作了一段時間,基本上我需要從this目錄讀取文件,但我不斷收到錯誤「無法打開連接」,請幫助我看看哪個部分出了問題?R錯誤無法打開連接使用url

希望這段代碼不會混淆你很多,真的想弄清楚如何從上面的鏈接中獲得所有文件以.M文件(.M09或.M10)結尾,如果你有更好的想法達到,請幫助,謝謝。

file.path.in <- file.path("C:", "Users", "agclim", "GAData", fsep=.Platform$file.sep); # Windows        
file.extension <- c("(\\.M\\d{2})"); 
filename.in.all <- list.files(file.path.in, pattern=paste(file.extension,"+$",sep=""), full.names=FALSE);  
filename.in.all <- sort(filename.in.all, decreasing=FALSE);   
library("gdata"); 
for (i.in in 1:length(filename.in.all)) { 
    cat(paste("The data in the",filename.in.all[i.in],"file are processing now.", sep=" "), "\n"); 
    url.conn.server <- url(file.path("ftp://agrofawn-prod01.osg.ufl.edu","pub", "howard","georgia",filename.in.all[i.in],fsep=.Platform$file.sep), open="r", blocking=TRUE, encoding=getOption("encoding"));  
    data.01 <- readLines(url.conn.server, n=-1, ok=TRUE);      
    unlink(url.conn.server); 
    close(url.conn.server); 
} 

回答

0

你不想在你的url()通話file.path()位。嘗試這個代替:

ftp_url <- "ftp://agrofawn-prod01.osg.ufl.edu/pub/howard/georgia/" 
# ...skipping loop logic... 
url.conn.server <- url(paste(ftp_url, filename.in.all[i.in], sep="")) 
+0

url.conn.server現在工作原理,但下面的行 「 Rosa

+0

什麼是錯誤? –

+0

原始錯誤是「NA文件中的數據正在處理中 URL中的錯誤(file.path(」ftp://agrofawn-prod01.osg.ufl.edu 「,」pub「,」howard「,:無法打開連接」,在我嘗試ur解決方案後,錯誤變成「NA文件中的數據正在處理中 readLines中的錯誤(url.conn.server,n = -1,ok = TRUE):無法打開連接「 – Rosa