将列值标签添加到 R googleVis gvisColumnChart?
Adding column value labels to R googleVis gvisColumnChart?
有人知道如何将列值标签添加到 gvisColumnChart() 吗?
有很多选项可供选择,我相信我不是第一个提出这个问题的人。这对我的项目真的很有帮助...
编辑:通过值标签,我的意思是这样的(数字本身写在条上):
我使用的是 R 3.2.0 和 googleVis 0.5.8
JS的答案在这里:
https://developers.google.com/chart/interactive/docs/gallery/columnchart
实质上是创建次要 view
元素并将其添加到绘图中:
var view = new google.visualization.DataView(data);
view.setColumns([0, 1,
{ calc: "stringify",
sourceColumn: 1,
type: "string",
role: "annotation" },
2]);
var options = {...};
var chart = new google.visualization.ColumnChart(document.getElementById("columnchart_values"));
chart.draw(view, options);
我只是不太清楚如何通过 R 传递这个额外的元素。帮助?
我在 R 中找到了解决方案。
Googlevis 需要一个 x 轴标签列和至少一个命名数据列。我复制了数据列,产生了一个三列数据集,在我的例子中它被称为图表集。
在数据列之后命名第三列(在我的例子中是 "Percentage")并在名称中添加“.annotation”,因此 "Percentage.annotation"。 googlevis 解释器足够聪明,可以识别它并将第三列作为注释放入。
setnames(chartset, c("Answer","Percentage","Percentage.annotation"))
p1 <- gvisColumnChart(chartset, xvar="Answer", yvar=c('Percentage',
'Percentage.annotation'), options=list(title= ccTitle,
vAxes="[{minValue:0}]"))
p1
有人知道如何将列值标签添加到 gvisColumnChart() 吗?
有很多选项可供选择,我相信我不是第一个提出这个问题的人。这对我的项目真的很有帮助...
编辑:通过值标签,我的意思是这样的(数字本身写在条上):
我使用的是 R 3.2.0 和 googleVis 0.5.8
JS的答案在这里: https://developers.google.com/chart/interactive/docs/gallery/columnchart
实质上是创建次要 view
元素并将其添加到绘图中:
var view = new google.visualization.DataView(data);
view.setColumns([0, 1,
{ calc: "stringify",
sourceColumn: 1,
type: "string",
role: "annotation" },
2]);
var options = {...};
var chart = new google.visualization.ColumnChart(document.getElementById("columnchart_values"));
chart.draw(view, options);
我只是不太清楚如何通过 R 传递这个额外的元素。帮助?
我在 R 中找到了解决方案。
Googlevis 需要一个 x 轴标签列和至少一个命名数据列。我复制了数据列,产生了一个三列数据集,在我的例子中它被称为图表集。
在数据列之后命名第三列(在我的例子中是 "Percentage")并在名称中添加“.annotation”,因此 "Percentage.annotation"。 googlevis 解释器足够聪明,可以识别它并将第三列作为注释放入。
setnames(chartset, c("Answer","Percentage","Percentage.annotation"))
p1 <- gvisColumnChart(chartset, xvar="Answer", yvar=c('Percentage',
'Percentage.annotation'), options=list(title= ccTitle,
vAxes="[{minValue:0}]"))
p1