Hello,
This is interresting. I think you did the big part of the job if
SciViews-R is starting. tcltk is used independently from the rest of
SciViews-R, for some dialog boxes and for R Commander. I think you
should try now to run tcltk on the plain RGui.exe under wine. I guess it
will eliminate various possible interferences... and then, if you
succeed, go back to RGui + SciViews-R + tcltk under Wine.
Unfortunatelly, I cannot help you much here (except if I have some code
to change for a better behaviour of SciViews-R under Wine).
For the use of tcltk with RGui.exe under Wine, the best person to
contact is the tcltk maintainer, that is, Peter Dalgaard.
Best,
Philippe Grosjean
P.S.: What about the performances of R / SciViews-R under Wine???
..............................................<??}))><........
) ) ) ) )
( ( ( ( ( Prof. Philippe Grosjean
) ) ) ) )
( ( ( ( ( Numerical Ecology of Aquatic Systems
) ) ) ) ) Mons-Hainaut University, Pentagone (3D08)
( ( ( ( ( Academie Universitaire Wallonie-Bruxelles
) ) ) ) ) 8, av du Champ de Mars, 7000 Mons, Belgium
( ( ( ( (
) ) ) ) ) phone: + 32.65.37.34.97, fax: + 32.65.37.30.54
( ( ( ( ( email: Philippe.Grosjean at umh.ac.be
) ) ) ) )
( ( ( ( ( web: http://www.umh.ac.be/~econum
) ) ) ) ) http://www.sciviews.org
( ( ( ( (
..............................................................
Hin-Tak Leung wrote:> Actually I am trying to run sciview-R and encounted some problems with
> tk, and I thought I'll check the basic library(tcltk) functionallity,
> just to be sure. Anybody seen that '[tcl] bad window path name
".1".'
> message before?
>
> Prof. Philippe Grosjean: yes, I have managed to load most of
> sciview-R under Wine, except the tcltk library!
>
> ==================> R : Copyright 2005, The R Foundation for Statistical
Computing
> Version 2.2.0 (2005-10-06 r35749)
> 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 a HTML browser interface to help.
> Type 'q()' to quit R.
>
> [Previously saved workspace restored]
>
> > library(tcltk)
> Loading Tcl/Tk interface ... done
> > demo(tkdensity)
>
>
> demo(tkdensity)
> ---- ~~~~~~~~~
>
> Type <Return> to start :
>
> > require(tcltk) || stop("tcltk support is absent")
> [1] TRUE
>
> > require(graphics)
> [1] TRUE
>
> > require(stats)
> [1] TRUE
>
> > local({
> y <- NULL
> xlim <- NULL
> size <- tclVar(50.000000)
> dist <- tclVar(1.000000)
> kernel <- tclVar("gaussian")
> bw <- tclVar(1.000000)
> bw.sav <- 1.000000
> replot <- function(...) {
> if (is.null(y))
> re .... [TRUNCATED]
> Error in structure(.External("dotTclObjv", objv, PACKAGE =
"tcltk"),
> class = "tclObj") :
> [tcl] bad window path name ".1".
> > demo(tkttest)
>
>
> demo(tkttest)
> ---- ~~~~~~~
>
> Type <Return> to start :
>
> > require(tcltk) || stop("tcltk support is absent")
> [1] TRUE
>
> > require(stats)
> [1] TRUE
>
> > local({
> dialog.t.test <- function() {
> tt <- tktoplevel()
> tkwm.title(tt, "t test")
> x.entry <- tkentry(tt, textvariable = xvar)
> y.entry <- tkentry(tt, textvariable = yvar)
> alt <- tclVar("two.sided")
> d .... [TRUNCATED]
> ******************************************************
> The source for this demo can be found in the file:
> C:/PROG~FBU/R/R-2_~MVR.0/library/tcltk/demo/tkttest.R
> ******************************************************
> Error in structure(.External("dotTclObjv", objv, PACKAGE =
"tcltk"),
> class = "tclObj") :
> [tcl] bad window path name ".2".
> >
> ===================================>
>