2008年10月31日金曜日

今日の R

今日の発見は、R は C や僕が知っている他の言語がサポートしているような

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 件のコメント: