[R] R TclTk Examples

[Christian Schulz]

many thanks for this contribution, perhaps
i add in near future some snippets with your starting points!

..here is one simple, but nice for anybody works often with spss-data.
regards,christian


getfile <- function()  {
    name <- tclvalue(tkgetOpenFile(filetypes="{{SPSS Files} {.sav}} {{All
files} *}"))
    if (name=="") return;
    zz <- read.spss(name,use.value.label=T,to.data.frame=T)
    assign("myData",zz,envir=.GlobalEnv)
}
tt <- tktoplevel()
button.widget <- tkbutton(tt,text="Select SPSS File",command=getfile)
tkpack(button.widget)



> Hi,
>
> I've been learning how to use R TclTk in Windows over the last
> few months.
>
> I have recently put together a collection of examples of
> some common widgets and their corresponding R code, at
>
> http://bioinf.wehi.edu.au/~wettenhall/RTclTkExamples/
>
> I would be interested in any feedback - Is it useful? Does it
> contain any significant errors or bad coding style?  Does anyone
> else want to contribute similar examples with screenshots?
>
> Regards,
> James
>
> --------------------------------------------------------------------------
> James Wettenhall                                  Tel: (+61 3) 9345 2629
> Division of Genetics and Bioinformatics           Fax: (+61 3) 9347 0852
> The Walter & Eliza Hall Institute         E-mail: wettenhall at wehi.edu.au
>  of Medical Research,                     Mobile: (+61 / 0 ) 438 527 921
> 1G Royal Parade,
> Parkville, Vic 3050, Australia
> http://www.wehi.edu.au
>
> ______________________________________________
> R-help at stat.math.ethz.ch mailing list
> https://www.stat.math.ethz.ch/mailman/listinfo/r-help