I truly apologize for not having been thorough in my first mail, requiring a
second mail.

- in Situation 1 (after installing 2.9.0 on top of 2.7.2) (ERROR 1) no
version number is visible upon choosing R 2.7.2 in RSwitch. (Error 1 is the
full error)
- in Situation 2 (after installng 2.7.2 on top of 2.9.0)  (ERROR 2), R 2.7.2
starts again, despite having selected 2.9.0 in RSwitch. I have clarified
Error 2 below to include the full crash output.

On Thu, Jun 4, 2009 at 5:07 PM, Min-Han Tan <minhan.tan@gmail.com> wrote:

> Hi,
>
> I am trying to run 2 versions of R, 2.7.2. and 2.9.0, and am trying to use
> R Switch on Mac OS Leopard 10.5.7
>
> I have been following the second step and removing
> /Library/Receipts/R-framework prior to installation of 2.9.0
>
> Upon installing 2.9.0, 2.9.0 runs OK, but if I select 2.7.2 on Rswitch, the
> following error results on startup (ERROR 1, below) and R crashes.
>
> Upon installing 2.7.2 (after similarly removing R-framework), and choosing
> R.2.9.0 on Rswitch, a slightly different error appears.
>
> Any advice would be very much appreciated.
>
> Regards,
> Min-Han
>
> Error 1
>
>  *** caught segfault ***
> address 0x24048910, cause 'memory not mapped'
>
> Traceback:
>  1: .Call("R_initMethodDispatch", as.environment(where), PACKAGE =
> "methods")
>  2: initMethodDispatch(where)
>  3: ..First.lib(libname, pkgName, env)
>  4: fun(...)
>  5: doTryCatch(return(expr), name, parentenv, handler)
>  6: tryCatchOne(expr, names, parentenv, handlers[[1]])
>  7: tryCatchList(expr, classes, parentenv, handlers)
>  8: tryCatch(expr, error = function(e) {    call <- conditionCall(e)    if
> (!is.null(call)) {        if (identical(call[[1]],
> quote(doTryCatch)))             call <- sys.call(-4)        dcall <-
> deparse(call)[1]        prefix <- paste("Error in", dcall, ": ")        LONG
> <- 75        msg <- conditionMessage(e)        sm <- strsplit(msg,
> "\n")[[1]]        if (14 + nchar(dcall, type = "w") + nchar(sm[1], type =
> "w") >             LONG)             prefix <- paste(prefix, "\n  ", sep =
> "")    }    else prefix <- "Error : "    msg <- paste(prefix,
> conditionMessage(e), "\n", sep = "")    .Internal(seterrmessage(msg[1]))
> if (!silent && identical(getOption("show.error.messages"),         TRUE))
> {        cat(msg, file = stderr())
> .Internal(printDeferredWarnings())    }    invisible(structure(msg, class =
> "try-error"))})
>  9: try({    fun(...)    NULL})
> 10: runHook(".onLoad", package, env, package.lib, package)
> 11: loadNamespace(package, c(which.lib.loc, lib.loc), keep.source =
> keep.source)
> 12: doTryCatch(return(expr), name, parentenv, handler)
> 13: tryCatchOne(expr, names, parentenv, handlers[[1]])
> 14: tryCatchList(expr, classes, parentenv, handlers)
> 15: tryCatch(expr, error = function(e) {    call <- conditionCall(e)    if
> (!is.null(call)) {        if (identical(call[[1]],
> quote(doTryCatch)))             call <- sys.call(-4)        dcall <-
> deparse(call)[1]        prefix <- paste("Error in", dcall, ": ")        LONG
> <- 75        msg <- conditionMessage(e)        sm <- strsplit(msg,
> "\n")[[1]]        if (14 + nchar(dcall, type = "w") + nchar(sm[1], type =
> "w") >             LONG)             prefix <- paste(prefix, "\n  ", sep =
> "")    }    else prefix <- "Error : "    msg <- paste(prefix,
> conditionMessage(e), "\n", sep = "")    .Internal(seterrmessage(msg[1]))
> if (!silent && identical(getOption("show.error.messages"),         TRUE))
> {        cat(msg, file = stderr())
> .Internal(printDeferredWarnings())    }    invisible(structure(msg, class =
> "try-error"))})
> 16: try({    ns <- loadNamespace(package, c(which.lib.loc, lib.loc),
> keep.source = keep.source)    dataPath <- file.path(which.lib.loc, package,
> "data")    env <- attachNamespace(ns, pos = pos, dataPath = dataPath)})
> 17: library(package, lib.loc = lib.loc, character.only = TRUE,
> logical.return = TRUE,     warn.conflicts = warn.conflicts, keep.source =
> keep.source,     version = version)
> 18: require("methods", quietly = TRUE, warn.conflicts = FALSE,
> character.only = TRUE,     save = FALSE)
> 19: .OptRequireMethods()
>
> Possible actions:
> 1: abort (with core dump, if enabled)
> 2: normal R exit
> 3: exit R without saving workspace
> 4: exit R saving workspace
>
> ERROR 2
> R version 2.7.2 (2008-08-25)
> Copyright (C) 2008 The R Foundation for Statistical Computing
> ISBN 3-900051-07-0
>
> R is free software and comes with ABSOLUTELY NO WARRANTY.
> You are welcome to redistribute it under certain conditions.
> Type 'license()' or 'licence()' for distribution details.
>
>   Natural language support but running in an English locale
>
> R is a collaborative project with many contributors.
> Type 'contributors()' for more information and
> 'citation()' on how to cite R or R packages in publications.
>
> Type 'demo()' for some demos, 'help()' for on-line help, or
> 'help.start()' for an HTML browser interface to help.
> Type 'q()' to quit R.
>
> Error in .Internal(grepl(as.character(pattern), x, ignore.case, extended,
> :
>   no internal function "grepl"
> Error in .Internal(grepl(as.character(pattern), x, ignore.case, extended,
> :
>   no internal function "grepl"
>
>  *** caught segfault ***
> address 0xc0000086, cause 'memory not mapped'
>
> Possible actions:
> 1: abort (with core dump, if enabled)
> 2: normal R exit
> 3: exit R without saving workspace
> 4: exit R saving workspace
> Selection:



>
> Error in .Internal(grepl(as.character(pattern), x, ignore.case, extended,
> :
>   no internal function "grepl"
> Error in .Internal(grepl(as.character(pattern), x, ignore.case, extended,
> :
>   no internal function "grepl"
>
>  *** caught segfault ***
> address 0xc0000086, cause 'memory not mapped'
>
> Possible actions:
> 1: abort (with core dump, if enabled)
> 2: normal R exit
> 3: exit R without saving workspace
> 4: exit R saving workspace
> Selection:
>

	[[alternative HTML version deleted]]

