找到Portfolio包中 map.market函数可以绘制（上图例就是使用此函数绘制的）；

但我不知道如何设置map.market函数参数，看论坛中那位用过map.market函数的告诉指点下，（附件中有用到的数据）谢谢！

Arguments

id       
A vector storing the labels to be used for each stock.

area       
A vector storing the values to be used to calculate the areas of rectangles.

group       
A vector specifying the group (i.e. country, sector, etc.) to which each stock belongs.

color       
A vector storing the values to be used to calculate the color of rectangles.

scale       
An object of class numeric indicating the scale to be used in determining colors.

lab       
A logical vector of length 2 specifying whether group and stock labels should be drawn. If the two values are the same, the second may be omitted.

main       
A title for the plot.

print       
An object of class logical indicating whether the map should be drawn.

这里选择分类可能比较重要，否则容易出现：
1: In log(max(w/h, h/w) * sum(z$area) * ((cz^2)/z$area)) : 产生了NaNs
导致出现长度有bug报错
我用你的前300个数据做了一下，
map.market(id=dta$存货名称,
           area=dta$无税金额,
           group=dta$存货分类名称,
           color=dta$数量)
还是有一个类似的图的

对，老是提示长度错误：
代码报错截图


这个问题怎么解决？能把你做的层级板块图 贴上来看看吗？

我猜想数据量太大导致的问题，如果拿前20-25个数据去作图还是可以得到一个满意的结果。