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
