r - gtext: 行数を指定

Question

R で gWidgets GUI フロント パッケージを使用しています。高さをgtext()ピクセル単位で指定できますが、gtext の高さをテキストの行数で指定するにはどうすればよいですか (html の textarea のように ...)?

特に、必要なテキスト入力フィールドは 1 行だけです。<input type="text">html に似ていますが、gtext()より似てい<textarea>ます。

Answer 1

1 つの解決策 (少しトリッキー) では、フォントメトリックを使用して設定できます。

library(gWidgets)
options(guiToolkit="RGtk2") 
w <- gwindow("brush example", visible=FALSE)

font.height <- 6   ## I don't know to get x-large metrics, so I fix it here
font.width  <- 50
obj <- gtext(container=w,height=5*font.height, width=5*font.width,
             font.attr=c(
  style="monospace", 
  color="blue", 
  size="x-large"))
add(obj,"mono blue large")
visible(w) <-  TRUE

Answer 2

@jverzani のコメントに基づく - 解決策はgedit、次のような単一行のエントリに使用することです。

xyear <- gedit("1980", height = 1, horizontal = F)