Although its kludgy this previously (and still works) too:
parent.frame(2)$ofile
if called from top level within a sourced file.
On Fri, Apr 4, 2008 at 11:50 AM, hadley wickham <[EMAIL PROTECTED]> wrote:
> Sorry, that should be:
>
> FILE <- (function() {
> attr(body(sys.function()), "srcfile")
Sorry, that should be:
FILE <- (function() {
attr(body(sys.function()), "srcfile")
})()$filename
Hadley
On Fri, Apr 4, 2008 at 10:34 AM, hadley wickham <[EMAIL PROTECTED]> wrote:
> I've often missed the ability to get the directory of the currently
> running script. It's actually been possib
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