博文

如何用数学表白

已有 18580 次阅读 2014-5-22 17:26 |系统分类:科普集锦

520表白需要创新，表白？是需要创新的！今天我就教你如何用数学表白。

1，首先来个简单的「r=a(1-sin θ)」，这可是笛卡尔和克丽丝汀之间秘密数学式哦！

2，这个就好理解了。

3，3D的

当然这可要技术了。
代码：MatLab code:
clear all
[x,y,z]=meshgrid(linspace(-2,2,80));
f=(x.^2+(9*y.^2)./4+z.^2-1).^3-((9*y.^2).*(z.^3))./80-(x.^2).*(z.^3);
p=patch(isosurface(x,y,z,f,0));
set(p,'FaceColor','r')
grid on
daspect([1 1 1])
view(3)
camlight('right') %下面三行是打光，
camlight('left')
camlight('headlight')
lighting phong
title('Heart of Math') %改成你想说的话

4，动画版的

Mathematica code:
[size=13.333333969116211px]ContourPlot3D[(x^2 + 2 y^2 + z^2 - 1)^3 - x^2 z^3 - (y^2 z^3)/10 == 0, {x, -1.3, 1.3}, {y, -1, 1}, {z, -1.3, 1.3}, PlotPoints -> 100, BoxRatios -> Automatic, Mesh -> None, Axes -> False, ContourStyle -> {Magenta, Specularity[White, 5]}]

小故事
全文转载如下：
笛卡尔，１７世纪时出生于法国，他对于后人的贡献相当大，

他是第一个创造发明坐标的人，可惜一生穷困潦倒。

一直到５２岁，仍然默默无名。

当时法国正流行黑死病，笛卡尔不得不逃离法国，

于是他流浪到瑞典当乞丐。

某天，他在市场乞讨时，有一群少女经过，

其中一名少女发现他的口音不像是瑞典人，

她对笛卡尔非常好奇，于是上前问他……

你从哪来的啊?

法国

你是做什么的啊?

我是数学家。

这名少女叫克丽丝汀，１８岁，是一个公主，

她和其它女孩子不一样，并不喜欢文学，而是热衷于数学。

当她听到笛卡尔说名身份之后，感到相当大的兴趣，于是把笛卡尔邀请回宫。

笛卡尔就成了她的数学老师，将一生的研究倾囊相授给克丽丝汀。

而克丽丝汀的数学也日益进步，直角坐标当时也只有笛卡尔这对师生才懂。

后来，他们之间有了不一样的情愫，发生了喧腾一时的师生恋。

这件事传到国王耳中，让国王相当愤怒！

下令将笛卡尔处死，克丽丝汀以自缢相逼，

国王害怕宝贝女儿真的会想不开，

于是……将笛卡尔放逐回法国，并将克丽丝汀软禁。

笛卡尔一回到法国后，没多久就染上了黑死病，躺在床上奄奄一息。

笛卡尔不断地写信到瑞典给克丽丝汀，但却被国王给拦截没收。

所以克丽丝汀一直没收到笛卡尔的信……

在笛卡尔快要死去的时候，他寄出了第１３封信，

当他寄出去没多久后...就气绝身亡了。

这封信的内容只有短短的一行……

r=a(1－sinθ)

国王拦截到这封信之后，拆开看，发现并不是一如往常的情话。

国王当然看不懂这个数学式，于是找来城里所有科学家来研究，

但都没有人能够解开到底是什么意思。

国王心想……反正笛卡尔快要死了，

而且公主被软禁时郁闷不乐的，所以，就把信交给克丽丝汀。

当克丽丝汀收到这封信时，雀跃无比，

她很高兴她的爱人还是在想念她的。她立刻动手研究这行字的秘密。

没多久就解出来了，用的就是直角坐标图（yxh注：实际上是极坐标系）

当θ＝0°时，r＝a(1－0)＝a　 ……　A点

当θ＝90°时，r＝a(1－1)＝0　 ……　B点

当θ＝180°时，r＝a(1－0)＝a　 ……　C点

当θ＝270°时，r＝a(1＋1)＝2a　……　D点

将整个曲线图作出来，就是有名的心脏线！