私はチュートリアルに取り組んでいますが、構文に苦労しています。どこが間違っているのかわかりませんが、コンソールからエラー メッセージが表示されます。
ディレクトリに 300 個の csv ファイルのリストがあります。ユーザーは、情報を求めているファイルの番号 (id) を入力します。フォーマットは次のようになります: 001.csv、002.csv、090.csv 250.csv など。
関数は、入力を csv ファイル名である文字列に変換することです。たとえば、id が 5 の場合、005.csv を返します。220に入力すると、220.csvを出力します。
コードは次のとおりです。
csvfile <- function(id) {
if (id < 10) { paste0(0,0,id,".csv"
} else if (id < 100) {paste0(0,id,".csv"
}else paste0(id,".csv")
}
コンソールが返すエラーは次のとおりです。
> csvfile <- function(id) {
+ if (id < 10) { paste0(0,0,id,".csv"
+ } else if (id < 100) {paste0(0,id,".csv"
Error: unexpected '}' in:
"if (id < 10) { paste0(0,0,id,".csv"
}"
> }else paste0(id,".csv")
Error: unexpected '}' in "}"
> }
R が私の '}' の一部を気に入らないことがわかりますが、その理由がわかりません。構文の何が問題になっていますか?