Hi,is it right?
    for (i in 1:length(imagens)) {
      buts[i] <- tkbutton(tt,
         text=paste("Figure",i),command=function()show(i))
      chk.g[i] <- tkcheckbutton(tt,text="Grafics",
         variable=grafs[i],command=function()(values[i] <- calcule(i) ))
      chk.f[i] <- tkcheckbutton(tt,text="Fotogr�fica",
         variable=fotos[i],command=function()(values[i] <- calcule(i)))
      tkgrid(chk.g[i],chk.f[i],buts[i])
    }

^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
Francisco J�nior,
Computer Science - UFPE-Brazil
"One life has more value that the
world whole"
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^

______________________________________________
[EMAIL PROTECTED] mailing list
http://www.stat.math.ethz.ch/mailman/listinfo/r-help

Reply via email to