Temat: Tworzenie graficznych interfejsów w R
bawiłem, się tcltk napisana na szybko (bez obsługi błędów) funkcja do "interaktywnego" (to za duże słowo :) wyświetlania kolumn macierzy wygląda tak jak poniżej, czyli nieciekawie, czy trzeba korzystać z assign() ?
# zawinięty plot
fplot<-function(i,dane){
plot(dane[,i],main=paste(i))
}
i=1 # startowa kolumna
dane=iris # dane
tt <- tktoplevel()
tktitle(tt) <- "tytul np. zakres kolumn"
button.plot.PlusOne <- tkbutton(tt, text="plot.PlusOne",
command=function(){assign("i",i+1,envir=.GlobalEnv);fplot(i,dane=dane)}
)
button.plot.MinusOne<- tkbutton(tt, text="plot,MinusOne",
command=function(){assign("i",i-1,envir=.GlobalEnv);fplot(i,dane=dane)}
)
tkgrid(button.plot.MinusOne,button.plot.PlusOne) # tkgrid umożliwia umieszczenie kilku przycisków w oknie
nie wiem czy można zapisać powyższy kod bez ręcznego tworzenia nowego środowiska przechowującego 'i' lub korzystania ze środowiska globalnego, dwa przyciski muszę komunikować się poprzez jakąś zmienną
ps. denerwujące jest, że okienko z przyciskami ucieka do paska zadań i nie pozostaje na pulpiciue RGui tak jak inne okna
Kamil Bęczyński edytował(a) ten post dnia 12.11.12 o godzinie 23:10