どう書く?org : 自分自身のファイル名を知る方法

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

自分自身のファイル名を知る方法を示してください。

ビルド後のファイルが、hogehoge.exeであれば、
”hogehoge.exe”が表示されるようなプログラムを書いてください。
スクリプト言語でも同様です。

ファイル名が変更されたらそれに追従するようにしてください。

#8706

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

Rスクリプトを実行するには、"--file=スクリプト名"、"-f
スクリプト名"、標準入力のいずれかでスクリプトを渡します。標準入力の場合はR本体の名前を出しています。

l <- commandArgs()
p <- which(l == "-f")  # -f [script.R]
s <- grep("--file=", l, value=T) # --file=[script.R]

my.name <- ifelse(length(s), sub("--file=", "", s), ifelse(length(p), l[p+1], l[1]))
basename(my.name)