# Rpad GUI test

This page shows some of the widget capabilities of dojo. The tabs below contain various plots generated by R. The plots have tooltips with them.

    plot(sin)
    HTMLon()
    showgraph()

    plot(cos)
    HTMLon()
    showgraph()

    plot(exp)
    HTMLon()
    showgraph()

Now, create a list dynamically:

    data(state)
    HTMLon()
    H("ul",
      H("li",
        state.name[1:6]))

Create some tabs dynamically:

    HTMLon()
    H("div",id="mainTabSet", dojoType="TabContainer", style="width: 50%; height: 10em;",
      H("div", dojoType="ContentPane", label="Tab 1",
        HTMLselect("mystate", state.name, default=3, dojoType="combobox", autocomplete="false"),
        BR,
        HTMLinput("myvar", value = 3),
        BR,
        HTMLcheckbox("isAL", text = "Alabama"),
        HTMLcheckbox("isWY", text = "Wyoming"),
        HTMLcheckbox("isMT", text = "Montana"),
        BR,
        H("input", dojoType = "dropdowndatepicker", name="myDate",
          value = "2006/01/01", displayFormat = "yyyy/MM/dd")),
      H("div", dojoType="ContentPane", label="Tab 2",
        "here's another tab",
        HTMLradio("AL", commonName = "myState", text = "Alabama"),
        HTMLradio("WY", commonName = "myState", text = "Wyoming"),
        HTMLradio("MT", commonName = "myState", text = "Montana")))

Data frames

    data(iris)
    HTMLon()
    H(head(iris))

Sortable data frames - click on the column headers

    data(iris)
    HTMLon()
    Rpad:::asFilteringTable(head(iris,n=20)) # not exposed to the public yet