どう書く?org : ファイルサイズの取得

original page : http://ja.doukaku.org/243/

ファイルが存在しているか調べ、存在していたらファイルサイズを取得し、表示してください。

#8693

original page : http://ja.doukaku.org/comment/8693/

filesize <- function(f) if(file.exists(f)) file.info(f)$size