2012-10-17 65 views
0

我有60個數據集,將dataset1標記爲數據集60 所有數據集都以相同的方式構建,但具有不同的數據。 我想從這些數據集中獲得2個變量的散點圖,並將其導出爲60個不同的pdf文件。 我嘗試下面的代碼,我也得到60個PDF文件,但它們都是一樣的loop pdf來自類似的數據集

for (i in 1:60) 
{ 
pdf(sprintf("C:/Users/ME/Desktop/WWD/WWD-Excel/Print/myout[%d].pdf", i)) 
dataset<-read.csv(sprintf("C:/Users/ME/Desktop/WWD/WWD-Excel/CSV/dataset[%d].csv", i), header = T, sep = ",", na.strings = "NA") 
plot(dataset$hhexppc, dataset$foodshare) 
dev.off() 
} 
+0

沒有什麼是明顯的錯誤。一路上你會收到任何錯誤信息嗎? –

+1

也許你的數據文件都是一樣的。添加一個標題,以便您可以檢查。試試title(sprintf(「Plot number%d」,i)) - 未經測試,但可能有效。 – Spacedman

回答

1

因爲你讀入dataset,和你繪製datasetpoor。學習閱讀你的工作!

+0

現在已過時,編輯後(可能已發表評論?) –

+0

這是一個答案,因爲它應該已經解決了問題...我們沒有更聰明的... – Spacedman

1

我成立了一家名爲迷你test目錄方含data1.csvdata2.csvdata3.csv,運行此代碼...

setwd("~/R/misc") 
for (i in 1:3) { 
    pdf(sprintf("print/myout%d.pdf",i)) 
    dataset <- read.csv(sprintf("tmpcsv/data%d.csv",i)) 
    plot(y~x,data=dataset) 
    dev.off() 
} 

...並得到了三個文件print/myout[1-3].pdf反映的數據。所以......我不能重現你的問題。