Hi,
it seems like tcltk is not installed on your system
You need to install it from here
choose
tcltk-8.5.5-x11.dmg
stefano
On 27 Jun 2011, at 02:00, William Mabe wrote:
Hi,
When I type library(cem), cem appears to load, but I am, unable to
execute any commands in R afterwards. I've pasted in the commands
I've used and what R has printed in the log. It seems like there's
an error, but I don't understand what's going on. (I've gotten this
rrot on my Mac Pro with 20GB ram and my macbook air.) Any help
greatly appreciated. Thanks, Bill
[R.app GUI 1.40 (5751) x86_64-apple-darwin9.8.0]
[History restored from /Users/undefined/.Rapp.history]
library(cem)
Loading required package:
nlme
Loading required package: lattice
Loading required package: randomForest
randomForest 4.6-2
Type rfNews() to see new features/changes/bug fixes.
Loading required package: tcltk
Loading Tcl/Tk interface ...
*** caught segfault ***
address 0x1000080, cause 'memory not mapped'
Traceback:
1: sys.parent()
2: sys.function(sys.parent())
3: formals(sys.function(sys.parent()))
4: match.arg(encoding)
5: match(match.arg(encoding), c("", "bytes", "UTF-8"))
6: textConnection("rval", "w", local = TRUE)
7: capture.output(print(args(load)))
8: paste(capture.output(print(args(load))), collapse = "")
9: gsub("\\s+", " ", paste(capture.output(print(args(load))),
collapse = ""))
10: doTryCatch(return(expr), name, parentenv, handler)
11: tryCatchOne(expr, names, parentenv, handlers[[1L]])
12: tryCatchList(expr, classes, parentenv, handlers)
13: tryCatch(expr, error = function(e) { call <- conditionCall
(e) if (!is.null(call)) { if (identical(call[[1L]], quote
(doTryCatch))) call <- sys.call(-4L) dcall <-
deparse(call)[1L] prefix <- paste("Error in", dcall, ":
") LONG <- 75L msg <- conditionMessage(e) sm
<- strsplit(msg, "\n")[[1L]] w <- 14L + nchar(dcall, type =
"w") + nchar(sm[1L], type = "w") if (is.na(w)) w
<- 14L + nchar(dcall, type = "b") + nchar(sm[1L],
type = "b") if (w > LONG) prefix <- paste
(prefix, "\n ", sep = "") } else prefix <- "Error :
" msg
<- paste(prefix, conditionMessage(e), "\n", sep = "") .Internal
(seterrmessage(msg[1L])) if (!silent && identical(getOption
("show.error.messages"), TRUE)) { cat(msg, file =
stderr()) .Internal(printDeferredWarnings()) }
invisible(structure(msg, class = "try-error"))})
14: try(gsub("\\s+", " ", paste(capture.output(print(args
(load))), collapse = "")), silent = TRUE)
Possible actions:
1: abort (with core dump, if enabled)
2: normal R exit
3: exit R without saving workspace
4: exit R saving workspace
load()
Selection:
-----------------------------------
Stefano M. Iacus
Department of Economics,
Business and Statistics
University of Milan
Via Conservatorio, 7
I-20123 Milan - Italy
Ph.: +39 02 50321 461
Fax: +39 02 50321 505
---
---
---
---
---
---------------------------------------------------------------------
Please don't send me Word or PowerPoint attachments if not
absolutely necessary. See: