R树形图-将总值添加到树形图标签

Question

树形图使用postMessage(message, '*')值缩放每个框的大小。

我想在树图打印标签中打印总金额的值。

当前代码：

vSize

library(treemap)
treemap(dtf=iris, index="Species", vSize="Sepal.Length")

Answer 1

汇总数据并创建新的索引和标签。

xtabs(Sepal.Length ~ Species, data = iris)
# Species
# setosa versicolor  virginica 
# 250.3      296.8      329.4