12 3 4 5 / 5 页下一页

查看: 11513|回复: 40

这函数太美, 我不敢看...

[复制链接]

字体大小: 正常放大

mcm-dlu-edu

98 主题	230 听众	1万积分

mcm

升级 0%

TA的每日心情

	怒 2015-11-22 11:00

签到天数: 679 天

[LV.9]以坛为家II

网络挑战赛参赛者

群组: 2015美赛优秀论文解析

群组: 第六届国赛赛前冲刺培

群组: 2014年地区赛数学建模

群组: 2013年美赛优秀论文解

群组: 2014美国中学生数学建

电梯直达

1^#

发表于 2014-11-16 20:16 |只看该作者 |正序浏览

|招呼Ta 关注Ta

本帖最后由 mcm-dlu-edu 于 2014-11-17 15:12 编辑

z = 1/8.*(6.*exp(-((2/3.*abs(x) - 1).^2 + (2/3.*y).^2) - 1/3*(2/3.*y + 1/2).^3) + 2/3.*exp(-2.818^11*((abs(2/3.*x) - 1).^2 + (2/3.*y).^2).^2) + 2/3.*y - (2/3.*x).^4);

z = 1/8.*(12.*exp(-((2/3.*abs(x) - 1).^2 + (2/3.*y).^2) - 1/3*(2/3.*y + 1/2).^3) + 2/3.*exp(-2.818^11*((abs(2/3.*x) - 1).^2 + (2/3.*y).^2).^2) + 2/3.*y - (2/3.*x).^4);

MATLAB代码:

breasts.m.rar (433 Bytes, 下载次数: 104)

点评

模天大楼 O(∩_∩)O哈哈~。。。发表于 2014-11-19 14:27

zan

转播1 淘帖0 分享4 收藏5 支持1 反对0 微信

使用道具举报

风中的漂流瓶

115 主题	18 听众	5344 积分

升级 6.88%

TA的每日心情

	开心 2018-2-7 19:09

签到天数: 255 天

[LV.8]以坛为家I

国际赛参赛者

自我介绍: 热爱数学建模

群组: 2014第三期英语写作

群组: 2015年数学中国“建模

群组: 2014美赛讨论

群组: 科技写作基础培训

群组: 2014年美赛冲刺培训

41^#

发表于 2015-3-3 11:53 |只看该作者 |招呼Ta 关注Ta

嘻嘻，不错，不错。学学

我也说一句

发表

使用道具举报

罗比达12138

0 主题	11 听众	151 积分

升级 25.5%

TA的每日心情

	怒 2016-9-9 10:27

签到天数: 43 天

[LV.5]常住居民I

群组: 2016国赛冲刺培训

群组: 2016国赛备战群组

40^#

发表于 2015-3-1 21:06 |只看该作者 |招呼Ta 关注Ta |邮箱已经成功绑定

这个猥琐

我也说一句

发表

使用道具举报

李太白

1 主题	10 听众	65 积分

升级 63.16%

TA的每日心情

	开心 2015-8-12 12:49

签到天数: 27 天

[LV.4]偶尔看看III

网络挑战赛参赛者

39^#

发表于 2015-2-28 14:58 |只看该作者 |招呼Ta 关注Ta

哎呦，，

我也说一句

发表

使用道具举报

宇仲

2 主题	13 听众	1263 积分

升级 26.3%

TA的每日心情

	开心 2015-4-10 07:33

签到天数: 36 天

[LV.5]常住居民I

38^#

发表于 2015-1-20 19:39 |只看该作者 |招呼Ta 关注Ta

求问怎么发帖啊？谢谢！

我也说一句

发表

使用道具举报

王大可

1 主题	14 听众	82 积分

升级 81.05%

TA的每日心情

	衰 2015-12-9 00:55

签到天数: 24 天

[LV.4]偶尔看看III

群组: 国赛讨论

37^#

发表于 2015-1-18 22:57 |只看该作者 |招呼Ta 关注Ta |邮箱已经成功绑定

66666666666666666666666666666666

我也说一句

发表

使用道具举报

方程equation

1 主题	8 听众	354 积分

升级 18%

TA的每日心情

	慵懒 2015-2-26 16:45

签到天数: 82 天

[LV.6]常住居民II

群组: 第六届国赛赛前冲刺培

36^#

发表于 2014-11-25 07:41 |只看该作者 |招呼Ta 关注Ta

用31#老师给的代码做的

Plot3D[
1/8
(6 Exp[-((2/3 Abs[x] - 1)^2
+ (2/3 y)^2) - 1/3 (2/3 y + 1/2)^3]
+ 2/3 Exp[-2.818^11 ((Abs[2/3 x] - 1)^2
+ (2/3 y)^2)^2] + 2/3 y - (2/3 x)^4),
{x, -3, 3}, {y, -3, 3},
PlotRange -> {-2, 1},
BoxRatios -> {6, 6, 4},
PlotPoints -> {100, 100},
ColorFunctionScaling -> False,
ColorFunction -> Function[{x, y, z},
If[Sqrt[(Abs[x] - 3/2)^2 + y^2] < 0.45,
Blend[{Pink,LightPink},0.5],LightPink]],
Mesh -> None
]