異なるファイルから一連のグラフを作成するためのループ

Question

私は、一連のファイルから長期間（数年間）平均降水量（pp）を月ごとにプロットしようとしています。各ファイルには、別の場所から収集されたデータがあります（コードは異なります）。私はタイトルで、代わりに24から24種類のヒストグラムの24種類のコードを持つ24件のヒストグラムを得る

files <- list.files(pattern=".csv") 
par(mfrow=c(4,6)) 
for (i in 1:24) { 
    obs <- read.table(files[i],sep=",", header=TRUE) 
    media.dia <- ddply(obs, .(day), summarise, daily.mean<-mean(pp)) 
    codigo <- unique(obs$code) 
    hist(daily.mean, main=c("hist per day of month", codigo)) 
} 

：

X code year month day pp 
1 2867 1945  1 1 0.0 
2 2867 1945  1 2 0.0 
... 

そして、私は、次のコードを使用しています：私の各ファイルには、次のようになります私は同じヒストグラムを24回取得します（24種類のタイトル）。誰も私になぜ教えてもらえますか？ありがとう！

Answer 1

コードには少なくとも2つのエラーがあります。

1. ddplyステートメントにエラーがあります。
2. 間違った変数をhistに渡しているため、以前のセッションアクションに応じて存在するかどうかをプロットします。

お客様のddplyステートメントの問題は、無効な割り当て（<-を使用）を行っていることです。 =を使用してこれを修正：

media.dia<- ddply(obs, .(day),summarise, daily.mean = mean(pp)) 

その後、あなたのhist文を編集します。

hist(media.dia$daily.mean,main=c("hist per day of month",codigo)) 

私は問題はあなたがhistに正しいパラメータを渡していないことであると思います。あなたのコードが実際にプロットを生成する理由は、あなたのセッションのいくつかの前のステップでは、daily.meanという変数を作成していなければならないからです（daily.mean）。

Answer 2

私はdaily.meanをddply関数が別の環境に割り当てられており、環境に存在しませんhistが表示されます。

試行daily.mean<<-mean(pp)