The Tuesday update script came back to get me! I knew it would.
update.packages has changed (for the better) with this release. Look at the
NEWS file:
The 'CRAN' argument to update.packages(), old.packages(),
new.packages(), download.packages() and install.packages() is
deprecated in favour of 'repos',
and...
There is a new possible value update.packages(ask="graphics")
and...
update.packages() and old.packages() have a new option
'checkBuilt' to allow packages installed under earlier
versions of R to be updated
So, if you want to keep updating on Tuesdays, despite sensible advice to the
contrary offered in this thread
http://finzi.psych.upenn.edu/R/Rhelp02a/archive/48390.html
you'll hvae to change the script to something like this:
# Run this once a week - say Tuesdays
if (interactive() ) { library(utils)}
is.tuesday <- as.POSIXlt(Sys.time())$wday == 2
if (is.tuesday == T)
{
cat("Running a package check...\nOccurs once a week, on Tuesdays\n")
cat("Upgrade existing packages and check for new packages (y/N)? ")
check.new <- as.character(readLines(n = 1))
if (any(check.new == "y", check.new == "Y"))
{
cat("This can take a few seconds...\n")
update.packages(ask=FALSE)
}
}
But, you should change this to a chron job.
HTH, Andy
> -----Original Message-----
> From: [EMAIL PROTECTED]
> [mailto:[EMAIL PROTECTED] Behalf Of
> [EMAIL PROTECTED]
> Sent: Tuesday, April 19, 2005 9:57 AM
> To: r-help@stat.math.ethz.ch
> Subject: [R] Re: automatic updating
>
>
> Hello,
> Running R 2.1.0 in a Win XP
> I put the snipped to automatically update my libraries on
> Tuesdays that was
> presented to the list some time back, It worked with no problem
> for R 2.0.1 but
> now that I installed R 2.1.0 and copy the old Rprofile to the new
> r/etc I get
> an error.
> This is my Rprofile:
> - - - - - - - - - - - - - - - - - - - -
> # Things you might want to change
>
> # options(papersize="a4")
> # options(editor="notepad")
> # options(pager="internal")
>
> # to prefer Compiled HTML help
> options(chmhelp=TRUE)
>
> # to prefer HTML help
> # options(htmlhelp=TRUE)
>
> # to prefer Windows help
> # options(winhelp=TRUE)
>
> .libPaths(c("c:/r/r_cran/library","c:/r/r_src/library",
> "c:/r/r_jl/library","c:/r/r_bdr/library",
> "c:/r/r_bio/library"))
> #
> # This script gets all the packages I don't already have
> # Run this once a week - say Tuesdays
> #
> if (interactive() ) { library(utils)}
> is.tuesday <- as.POSIXlt(Sys.time())$wday == 2
> if (is.tuesday == T)
> {
> cat("Running a package check...\nOccurs once a week, on Tuesdays\n")
> cat("Upgrade existing packages and check for new packages (y/N)? ")
> check.new <- as.character(readLines(n = 1))
> if (any(check.new == "y", check.new == "Y"))
> {
> options(CRAN = "http://cran.us.r-project.org/";)
> cat("This can take a few seconds...\n")
> x <- packageStatus(repositories =
> getOption("repositories")()[[1]])
> print(x)
> install.packages(x$avail$Package[x$avail$Status == "not
> installed"])
> cat("Upgrading to new versions if available\n")
> upgrade(x)
> }
> }
> #
> - - - - - - - - - - - - -
> when I start R 2.1.0 I get:
>
> R : Copyright 2005
> ....
> Type 'q()' to quit R
>
> Running a package check...
> Occurs once a week, on Tuesdays
> Upgrade existing packages and check for new packages (y/N)? y
> This can take a few seconds...
> Error in packageStatus(repositories = getOption("repositories")()[[1]]) :
> attempt to apply non-function
>
> Where do I have to modify the snippet so it works with R 2.1, it
> was perfect for
> 2.0.1
> Thanks for any help
>
> Heberto Ghezzo
> McGill University
> Montreal - Canada
>
> ______________________________________________
> R-help@stat.math.ethz.ch mailing list
> https://stat.ethz.ch/mailman/listinfo/r-help
> PLEASE do read the posting guide!
> http://www.R-project.org/posting-guide.html
>
______________________________________________
R-help@stat.math.ethz.ch mailing list
https://stat.ethz.ch/mailman/listinfo/r-help
PLEASE do read the posting guide! http://www.R-project.org/posting-guide.html
