__FILE__ for R
I've often missed the ability to get the directory of the currently
running script. It's actually been possible for a while:
FILE <- (function() {
attr(body(sys.function()), "srcfile")
})()
thanks to Duncan's recent changes to file parsing. This is pretty
useful for sourcing in files relative to the current script, rather
than the working directory.
Hadley