Bonjour Ivan,

Did you have a chance to install the "tcltk-8.5.5-x11.dmg" file at:

http://cran.r-project.org/bin/macosx/tools/

Best Regards,

Ray DiGiacomo, Jr.
Healthcare Predictive Analytics Specialist
Master R Trainer
President, Lion Data Systems LLC
President, The Orange County R User Group
Board Member, TDWI
rayd@liondatasystems.com
(m) 408-425-7851
San Juan Capistrano, California USA
twitter.com/liondatasystems
linkedin.com/in/raydigiacomojr
youtube.com/user/liondatasystems/videos

Check out my one-on-one web-based R Training Courses at
liondatasystems.com/courses







On Tue, Dec 4, 2012 at 1:51 AM, Ivan Calandra
<ivan.calandra@u-bourgogne.fr>wrote:

> Dear users,
>
> In trying to use tcltk, svDialogs and gsubfn I have encountered an error
> that seems to stem from package Tcl/Tk.
>
>
> I can load tcltk, everything looks fine, but if I try ?tk_choose.dir or
> whatever, then R hangs and I have to force exit.
>
> I have tried with svDialogs as well and here is what happens:
>
> > sessionInfo()
> R version 2.15.2 (2012-10-26)
> Platform: i386-apple-darwin9.8.0/i386 (32-bit)
> locale:
> [1] fr_FR.UTF-8/fr_FR.UTF-8/fr_FR.**UTF-8/C/fr_FR.UTF-8/fr_FR.UTF-**8
> attached base packages:
> [1] stats     graphics  grDevices utils     datasets  methods   base
>
> > library(svDialogs)
> Le chargement a nécessité le package : svGUI
> Le chargement a nécessité le package : svMisc
> Le chargement a nécessité le package : tcltk
> Chargement de Tcl/Tk...
>  *** caught bus error ***
> address 0x1, cause 'non-existent physical address'
>
> 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(**dlgDir)))
>  8: paste(capture.output(print(**args(dlgDir))), collapse = "")
>  9: gsub("\\s+", " ", paste(capture.output(print(**args(dlgDir))),
> 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 <- paste0(prefix,
> "\n  ")    } else prefix <- "Error : "    msg <- paste0(prefix,
> conditionMessage(e), "\n") .Internal(seterrmessage(msg[**1L]))    if
> (!silent && identical(getOption("show.**error.messages"),         TRUE))
> { cat(msg, file = stderr()) .Internal(**printDeferredWarnings())    }
> invisible(structure(msg, class = "try-error", condition = e))})
> 14: try(gsub("\\s+", " ", paste(capture.output(print(**args(dlgDir))),
>   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
>
> > mydir <- dlgDir()
>
> Everything from ***caught bus error*** appears only when I type the last
> line (mydir <- dlgDir()).
>
> I have the same problem with any function from gsubfn, i.e. any function
> that uses tcltk...
>
>
> Can anyone help me?
>
> Ivan
>
> --
> Ivan CALANDRA
> Université de Bourgogne
> UMR CNRS/uB 6282 Biogéosciences
> 6 Boulevard Gabriel
> 21000 Dijon, FRANCE
> +33(0)3.80.39.63.06
> ivan.calandra@u-bourgogne.fr
> http://biogeosciences.u-**bourgogne.fr/calandra<http://biogeosciences.u-bourgogne.fr/calandra>
>
> ______________________________**_________________
> R-SIG-Mac mailing list
> R-SIG-Mac@r-project.org
> https://stat.ethz.ch/mailman/**listinfo/r-sig-mac<https://stat.ethz.ch/mailman/listinfo/r-sig-mac>
>

	[[alternative HTML version deleted]]

