printf("%d", x);
をサポートしてない気がする。つまり、文字列周り or 文字列<=>整数の型変換が面倒。。。
今日の R は以下のような感じ。今日の日付を Sys.Date() で取得し、何時という情報を
2桁数字として、日付に付与して、myPrint 関数を呼び出し、出力。
# もう少しうまいやり方ないかな。。。
dir <- "~/ALL"
myPrint <- function(fname) {
print(fname)
}
date <- format(Sys.Date(), "%Y%m%d")
fprefix <- paste(dir, date, sep="", collapse="")
for (i in 0:23) {
if(i < 10)
fname <- paste(fprefix, "0", i, sep="", collapse="")
else
fname <- paste(fprefix, i, sep="", collapse="");
myPprint(fname)
}
0 件のコメント:
コメントを投稿