光沢のあるRとgoogleVisには初心者です。私は、パラメータとして渡される変数のデータ型に応じて別のウィンドウにgoogleVisグラフ(棒グラフ、円グラフなど)を作成するexplore(...)というメソッドを持っています。また、ユーザーがVisualize(uiのcheckBox)オプションをチェックしたかどうかをチェックします。真の場合は、中心傾向と分散値を保持するgVisTable
とともにプロットを描画します。私はgVisMerge()
を使ってこれを行うことができました。しかし、Visualizeのチェックボックスがチェックされていない場合は、別のページにgVisTable
と表示されます。後者の場合は、タイトルをgVisTable
にする必要があります。光沢のあるgvisTableのタイトルを与える方法R
これはボタンクリックで発生します。プロットを生成するにはexplore()
というメソッドが呼び出されます。
observeEvent(input$exploreButton, {
print(input$variableInput)
options <- list()
options$variableName <- input$variableInput
options$visualize <- input$visualizeCheckBox
options$centralTendency <- input$centralTendencyCheckBox
options$dispersion <- input$measureDispersionCheckBox
explore(dataset[, input$variableInput], options)
})
、これはプロットとテーブルをマージする方法を探るからコードの一部です。または単にgvisTableを表示します。
ここinformationTable <- gvisTable(as.data.frame.matrix(valuesTable), options=list(height=300, width=200))
if(options$visualize)
{
barChart <- getSimpleBarChart(table(x), paste("Bar Chart for ", options$variableName), "bottom", 1500, 600)
plot(gvisMerge(barChart, informationTable, horizontal=FALSE))
}
else {
plot(informationTable)
}
getSimpleBarChart(...)
はBarChartコントロールすなわち
getSimpleBarChart <- function(data, title, legend_location='bottom', width=400, height=400) {
options <- list(title=title, legend=legend_location, tooltip="{isHtml:'True'}", bar="{groupWidth:'90%'}", width=width, height=height)
g <- gvisBarChart(as.data.frame(data), options=options)
g
}
を生成するために書かれた別の方法は、我々はgoogleVisチャートの残りの部分で行うようgVisTable
にタイトルを与える方法はありますか?これは、それ故、HTMLである第一
myGvisTable$html$header
としてgvisテーブルのヘッダをフェッチすることによって達成することができる
いくつかのコードを投稿してください。独立して実行されるコード。 –