☰

在 Mathematica 中绘制 3D 条形图

tag-icon • tag-icon mathematica
在 Mathematica 中绘制 3D 条形图

我想在 Mathematica 中绘制 3D 条形图，如以下链接所示

Excel 中的 XYZ 三维图表

如何创建网格和圆柱图？我可以在 Mathematica 中以不同的方式完成，但效果不如上述链接中提供的那样好。

答案1

在这种情况下，自己创建类似的东西确实很容易。创建一个函数，Cylinder为所有数据点创建一个颜色，然后Graphics3D用你喜欢的选项包裹它。以下是一个例子：

testData = RandomInteger[{0, 10}, {20, 3}];
Graphics3D[
 Function[{x, y, z}, 
   {RandomColor[], Cylinder[{{x, y, 0}, {x, y, z}}, 0.5]}] @@@ testData, 
 FaceGrids -> {{-1, 0, 0}, {0, 1, 0}, {0, 0, -1}}, Boxed -> True
]

Mathematica 图形

相关内容