R devel - Oct 1997 - R-alpha: system() ok -- is.R() function

Martin

Your revisions to my S--R compatability code suggest that tempfile() is
in R after 0.49. I don't find that to be the case. It requires code from
Friedrich Leisch which still has to be added as of 0.50 alpha3.

Paul
_______
R : Copyright 1997, Robert Gentleman and Ross Ihaka
Version 0.50 Alpha-3 (August 8, 1997)
> exists("tempfile", mode = 'function')
[1] FALSE
>
=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-
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
=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-

>>>>> Paul Gilbert writes:
> Martin
> Your revisions to my S--R compatability code suggest that tempfile() is
> in R after 0.49. I don't find that to be the case. It requires code
from
> Friedrich Leisch which still has to be added as of 0.50 alpha3.
> Paul
> _______
> R : Copyright 1997, Robert Gentleman and Ross Ihaka
> Version 0.50 Alpha-3 (August 8, 1997)
>> exists("tempfile", mode = 'function')
> [1] FALSE
>>
Under Unix, you can do with the following which will also be in 0.60:

tempfile <- function(pattern = "file") {
  system(paste("for p in", paste(pattern, collapse = " "),
";",
               "do echo /tmp/$p$$; done"),
         intern = TRUE)
}


-k
=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-
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
=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-

>>>>> "Paul" == Paul Gilbert
<pgilbert@bank-banque-canada.ca> writes:
    Paul> Martin Your revisions to my S--R compatability code suggest that
    Paul> tempfile() is in R after 0.49. I don't find that to be the
    Paul> case. It requires code from Friedrich Leisch which still has to
    Paul> be added as of 0.50 alpha3.

However,  it IS there in  0.50 Alpha-4 :

R : Copyright 1997, Robert Gentleman and Ross Ihaka
Version 0.50 Alpha-4 (September 10, 1997)

R is free software and comes with ABSOLUTELY NO WARRANTY.
You are welcome to redistribute it under certain conditions.
Type "license()" for details.
> tempfile
function (pattern = "file") 
{
        system(paste("for p in", paste(pattern, collapse = "
"),
                "; do echo /tmp/$p$$; done"), intern = TRUE)
}

----------
(and the same version is in current 0.60 pre-alpha).

Yes, I've thought too, that it could be better to use Fritz' C-version
since that one might also work on non-Unix systems.


=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-
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
=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-