tkrplot のバックアップソース(No.1)

• バックアップ一覧
• 差分 を表示
• 現在との差分 を表示
• バックアップ を表示
• tkrplot へ行く。
  • 0 (1970-01-01 (木) 18:00:00)
  • 1 (2015-03-01 (日) 01:15:59)

// 谷村 2005年  4月 14日 木曜日
// 自由に修正加筆してください

COLOR(red){SIZE(25){tkrplot}}

#contents

* tkrplotとは [#n559f7a6]

tkrplotとは、Tk ウィジェットの中にRグラフィックを配置するライブラリである。

* 実例 [#jeadc5e7]
 library(tcltk)
 library(tkrplot)
 tt <- tktoplevel()
 bb <- 1
 img <- tkrplot(tt, function() plot(1:20,(1:20)^bb))
 f <- function(...) {
   b <- as.numeric(tclvalue("bb"))
   if (b != bb) {
     bb <<- b
     tkrreplot(img)
   }
 }
 a <- tkscale(tt, command=f, from=0.05, to=2.00, variable="bb",
              showvalue=FALSE, resolution=0.05, orient="horiz")
 tkpack(img,a)

''結果''

&ref(tkrplot.gif);
// x11recで録画しましたが、これってWindow枠やマウスカーソルが記録されない
// のですね。vnc2swfの方がよかったのかな。

例えば、このようにマウスでスクロールして対話的にグラフを表示するようなものを作成できる。

* コメントなど [#c5b0b8c2]

#comment