1

私はいくつかのインタラクティブなチャートを作成しようとしていますRookgoogleVis

現在、ユーザーが日付を入力して変更をトリガーできる HTML テキスト ボックスがあります。

res <- Rook::Response$new()
res$write('<input type="text" name="theDate">')

これをコンボボックスに置き換えたい

res$write('<input type="dropdown" name="theDate">')

これに似たRベクトルが入力されます

displayDates <- c("12 Mar 1980" ,"19 Mar 1980")

私がこの HTML の作業を始めてから 10 年ほど経ちますが、私もまだ始めたばかりです。Rook

4

1 に答える 1

2

多分このようなもの:

library(Rook)
dates <- c("12 Mar 1980" ,"19 Mar 1980")

app <- function(env){
    req <- Rook::Request$new(env)
    res <- Rook::Response$new()
    res$write('<select>')
    res$write(paste("<option>", dates , "</option>"))
    res$write('</select>')
    res$finish()
}

s <- Rhttpd$new()
s$launch(name="myapp", app=app)
于 2012-10-13T19:25:12.077 に答える