Cheers Chuck and Greg for your help!
only Chucks solution though worked for my problem, for Gregs solution I would
have had to start R in interactive mode which I do not do as I start the
scripts still from an interactive GUI.
Thanks a lot!
Jannis
--- Charles C. Berry <cbe...@tajo.ucsd.edu> schrieb am Mi, 23.6.2010:
> Von: Charles C. Berry <cbe...@tajo.ucsd.edu>
> Betreff: Re: [R] possibility to determine whether a script is "sourced"?
> An: "Jannis" <bt_jan...@yahoo.de>
> CC: r-help@r-project.org
> Datum: Mittwoch, 23. Juni, 2010 17:37 Uhr
> On Wed, 23 Jun 2010, Jannis wrote:
>
> > Dear R community,
> >
> >
> > I am running some rather large scripts either by
> executing single blocks of them separately or by executing
> them at once via
> >
> > source('script.R')
> >
> > Now there is a lot of code in those scripts that I
> only want to run when I run them manually, so I wonder
> whether there is any way to automatically find out whether
> the script is run manually stepwise or whether it is run via
> source. Is there such a possibility?
>
> Yes. You can set a flag at the start of your 'script.R'
>
> Try this
>
> > cat("sc <- sys.calls()",file="stest.R")
> > source("stest.R")
> > print( sc )
> [[1]]
> source("stest.R")
>
> [[2]]
> eval.with.vis(ei, envir)
>
> [[3]]
> eval.with.vis(expr, envir, enclos)
>
> > sc <- sys.calls() # run the code interactively
> > print( sc )
> NULL
> >
>
> See
>
> ?sys.calls
> ?is.null
>
> HTH,
>
> Chuck
>
> >
> > Thanks a lot for your help!
> > Jannis
> >
> >
> >
> > ______________________________________________
> > R-help@r-project.org
> mailing list
> > https://stat.ethz.ch/mailman/listinfo/r-help
> > PLEASE do read the posting guide http://www.R-project.org/posting-guide.html
> > and provide commented, minimal, self-contained,
> reproducible code.
> >
>
> Charles C. Berry
>
> (858) 534-2098
>
>
> Dept of
> Family/Preventive Medicine
> E mailto:cbe...@tajo.ucsd.edu
> UC San Diego
> http://famprevmed.ucsd.edu/faculty/cberry/ La
> Jolla, San Diego 92093-0901
>
>
>
______________________________________________
R-help@r-project.org mailing list
https://stat.ethz.ch/mailman/listinfo/r-help
PLEASE do read the posting guide http://www.R-project.org/posting-guide.html
and provide commented, minimal, self-contained, reproducible code.
