%在MATLAB中運行
%{
這篇的代碼是我根據網上的資料整理編寫的，實現生成一個旋轉的心形并配以文字的功能，科研男可以用它來向心儀的女神表白用。
誰說理工科男生不懂浪漫！
當然，女神最好是理工科出身的，文科女一來不懂MATLAB是何物，二來不會明白調試代碼的辛苦，所以文科女是很難領會到其中的感情的。

本代碼是我寫給女朋友的，發布前未作修改，只是增加了注釋。具體怎么修改，懂MATLAB的同志們基本一看就明白的，我就不說太多了。

想交流的話：
本人人人頁面：http://www.renren.com/232502474??加好友需要驗證，不過可以留言；
QQ：439246372

%}
clear?all;
close?all;
clc;
%配置函數，建立圖形
%f=@（xyz）（x.^2+y.^2+z.^2-1）;%這是個球體的方程，測試時候用的，現在注釋掉了
f=@（xyz）（x.^2+?（9./4）.*y.^2?+?z.^2?-?1）.^3?-?x.^2.*z.^3.*2?-?（9./80）.*y.^2.*z.^3;%這個是心形的方程
[xyz]=meshgrid（-2:0.04:2）;?%設置網格密度，中間的數字越小，格越密，形狀越逼真，但是太密可能導致內存不足而無法運行.我2GB內存，最高設置到0.03.
?val=f（xyz）;
?[pv]=isosurface（xyzval0）;
?%配置顯示環境
?figure（‘Color‘[0?0?0]‘Position‘[200100800500]）;
?axes（‘Color‘[0?0?0]‘XColor‘[1?1?1]‘YColor‘[1?1?1]‘ZColor‘[1?1?1]‘FontSize‘1‘Visible‘‘off‘）;
?patch（‘faces‘p‘vertices‘v‘facevertexcdata‘jet（size（v1））‘facecolor‘‘none‘‘edgecolor‘‘interp‘）;
?%?‘color‘?后面可以是?‘r‘‘g‘‘b‘‘c‘‘m‘‘y‘‘w‘?or?‘k‘，對應不同的顏色，或者[xyz]xyz是MAT