`if (exists(is.R) && is.function(is.R) && is.R()) {'
` '## R-specific code
`} else {'
` '## S-version of code
`}'
It should be writen as '' exists("is.R") '' (is.R must be quoted).
exists(is.R)
Error in exists(x, envir, mode, inherits) :
invalid first argument
exists("is.R")
[1] TRUE
giacomo
-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-
r-devel mailing list -- Read http://www.ci.tuwien.ac.at/~hornik/R/R-FAQ.html
Send "info", "help", or "[un]subscribe"
(in the "body", not the subject !) To: r-devel-request@stat.math.ethz.ch
_._._._._._._._._._._._._._._._._._._._._._._._._._._._._._._._._._._._._._._._