作者waterfat520 ( )
看板Statistics
标题Re: [问题]Mathematica的3D图问题 再问
时间Sat Aug 30 17:55:23 2008
※ 引述《chungyuandye (养花种鱼数月亮看星星)》之铭言：
: ※ 引述《waterfat520 ( )》之铭言：
又碰到一个画3D问题 关於图形上色
指令如下result为10*20的资料，以x座标和y座标画出3D图
ListPlot3D[Table[result[x, y], {x, 1, 10, 1}, {y, 1, 20, 1}],
Mesh -> True, Shading -> True]
我想在每一格中画不同的颜色(颜色可自行控制)，想用GrayLevel[]画，
颜色表示存在另一个10*20的color资料中，我是把{result,color}对映表示，
但似乎ListPlot3D无法上色，不知道问题出在那
ListPlot3D[Table[{result[x, y],
GrayLevel[color[x, y]]}, {x, 1, 10, 1}, {y, 1, 20, 1}],
Mesh -> True, Shading -> True]
--
※ 发信站: 批踢踢实业坊(ptt.cc)
◆ From: 140.114.123.133