作者chungyuandye (养花种鱼数月亮赏星星)
站内Statistics
标题Re: [问题] 有关Mathematica 3D图形 的最小值
时间Sun Jul 12 09:20:27 2009
※ 引述《rainnight (rainnight)》之铭言：
: 请问有板上先进知道 Mathematica绘出的3D图形
: 要如何找出最小值吗?
: 需要 数值的型式
: 另外请问 如果想将图形汇出成 Excel档案 或是 数值资料 档案
: 该如何执行会比较妥当(是3D的图形)
: 因为老师蛮赶的 = =
: 拜托有概念的先进能指点一下
: 感激不尽
假设f(x,y)=sin(xy),
(* 绘图并定义为myplot *)
myplot = Plot3D[Sin[x*y], {x, 0, 2 Pi}, {y, 0, 2 Pi}]
(* 将myplot所描绘的点取出，指定给myxpts *)
myxpts = Cases[myplot, GraphicsComplex[xpts : _, _, _] :> xpts][[1]];
(* 将myxpts汇出存成csv档 *)
Export["~/myxpts.csv",myxpts]
--
养花种鱼数月亮赏星星
http://chungyuandye.blogspot.com
--
※ 发信站: 批踢踢实业坊(ptt.cc)
◆ From: 218.173.132.234