MATLAB 3D玫瑰花绘制（内附旋转版本）

参考博文：[Art & Science] 用python绘制3D花（二）

另：旋转版本在文章最后

目录

1 玫瑰花绘制绘制效果完整代码2 月季花绘制绘制效果完整代码3 玫瑰配色颜色展示颜色数据自取4.旋转版本

1 玫瑰花绘制

绘制效果

完整代码

function drawrosegrid on[x,t]=meshgrid((0:24)./24,(0:0.5:575)./575.*20.*pi+4*pi);p=(pi/2)*exp(-t./(8*pi));change=sin(15*t)/150;u=1-(1-mod(3.6*t,2*pi)./pi).^4./2+change;y=2*(x.^2-x).^2.*sin(p);r=u.*(x.*sin(p)+y.*cos(p));h=u.*(x.*cos(p)-y.*sin(p));map=[0.9176 0.9412 1.00000.9094 0.9341 0.99920.9011 0.9271 0.99840.8929 0.9200 0.99770.8847 0.9130 0.99690.8764 0.9059 0.99610.8682 0.8988 0.99530.8600 0.8918 0.99450.8518 0.8847 0.99380.8435 0.8777 0.99300.8353 0.8706 0.99220.8337 0.8698 0.99100.8322 0.8690 0.98980.8306 0.8682 0.98870.8290 0.8674 0.98750.8275 0.8667 0.98630.8259 0.8659 0.98510.8243 0.8651 0.98390.8227 0.8643 0.98280.8212 0.8635 0.98160.8196 0.8627 0.98040.8078 0.8521 0.97650.7961 0.8415 0.97260.7843 0.8310 0.96860.7726 0.8204 0.96470.7608 0.8098 0.96080.7490 0.7992 0.95690.7373 0.7886 0.95300.7255 0.7781 0.94900.7138 0.7675 0.94510.7020 0.7569 0.94120.6836 0.7400 0.93960.6651 0.7232 0.93810.6467 0.7063 0.93650.6282 0.6894 0.93490.6098 0.6725 0.93340.5914 0.6557 0.93180.5729 0.6388 0.93020.5545 0.6219 0.92860.5360 0.6051 0.92710.5176 0.5882 0.92550.5027 0.5776 0.92710.4878 0.5670 0.92860.4729 0.5565 0.93020.4580 0.5459 0.93180.4431 0.5353 0.93340.4282 0.5247 0.93490.4133 0.5141 0.93650.3984 0.5036 0.93810.3835 0.4930 0.93960.3686 0.4824 0.94120.3623 0.4742 0.94040.3561 0.4659 0.93960.3498 0.4577 0.93880.3435 0.4494 0.93800.3372 0.4412 0.93730.3310 0.4330 0.93650.3247 0.4247 0.93570.3184 0.4165 0.93490.3122 0.4082 0.93410.3059 0.4000 0.93330.2981 0.3918 0.92350.2902 0.3835 0.91370.2824 0.3753 0.90390.2745 0.3670 0.89410.2667 0.3588 0.88430.2589 0.3506 0.87450.2510 0.3423 0.86470.2432 0.3341 0.85490.2353 0.3258 0.84510.2275 0.3176 0.83530.2169 0.3086 0.81650.2063 0.2996 0.79770.1957 0.2906 0.77880.1851 0.2816 0.76000.1746 0.2726 0.74120.1640 0.2635 0.72240.1534 0.2545 0.70360.1428 0.2455 0.68470.1322 0.2365 0.66590.1216 0.2275 0.6471];set(gca,'CameraPosition',[2 2 2])hold onsurface(r.*cos(t),r.*sin(t),h,'EdgeAlpha',0.1,...'EdgeColor',[0 0 0],'FaceColor','interp')colormap(map)end

2 月季花绘制

绘制效果

完整代码

function drawrose2grid on[x,t]=meshgrid((0:24)./24,(0:0.5:575)./575.*20.*pi-4*pi);p=(pi/2)*exp(-t./(8*pi));change=sin(20*t)/150;u=1-(1-mod(3.3*t,2*pi)./pi).^4./2+change;y=2*(x.^2-x).^2.*sin(p);r=u.*(x.*sin(p)+y.*cos(p)).*1.5;h=u.*(x.*cos(p)-y.*sin(p));map=[0.9176 0.7490 0.37650.9188 0.7513 0.38790.9200 0.7537 0.39920.9211 0.7560 0.41060.9223 0.7584 0.42200.9235 0.7608 0.43340.9247 0.7631 0.44470.9259 0.7654 0.45610.9270 0.7678 0.46750.9282 0.7702 0.47880.9294 0.7725 0.49020.9298 0.7698 0.50080.9302 0.7670 0.51140.9306 0.7643 0.52200.9310 0.7615 0.53260.9314 0.7588 0.54320.9317 0.7561 0.55370.9321 0.7533 0.56430.9325 0.7506 0.57490.9329 0.7478 0.58550.9333 0.7451 0.59610.9290 0.7404 0.58940.9247 0.7357 0.58280.9204 0.7310 0.57610.9161 0.7263 0.56940.9118 0.7215 0.56270.9074 0.7168 0.55610.9031 0.7121 0.54940.8988 0.7074 0.54270.8945 0.7027 0.53610.8902 0.6980 0.52940.8890 0.6976 0.53880.8878 0.6972 0.54820.8867 0.6968 0.55760.8855 0.6964 0.56700.8843 0.6961 0.57650.8831 0.6957 0.58590.8819 0.6953 0.59530.8808 0.6949 0.60470.8796 0.6945 0.61410.8784 0.6941 0.62350.8827 0.6988 0.63640.8870 0.7035 0.64940.8914 0.7082 0.66230.8957 0.7129 0.67530.9000 0.7177 0.68820.9043 0.7224 0.70110.9086 0.7271 0.71410.9130 0.7318 0.72700.9173 0.7365 0.74000.9216 0.7412 0.75290.9153 0.7275 0.75450.9090 0.7137 0.75600.9028 0.7000 0.75760.8965 0.6863 0.75920.8902 0.6725 0.76080.8839 0.6588 0.76230.8776 0.6451 0.76390.8714 0.6314 0.76550.8651 0.6176 0.76700.8588 0.6039 0.76860.8580 0.5906 0.75570.8572 0.5772 0.74270.8565 0.5639 0.72980.8557 0.5506 0.71680.8549 0.5373 0.70390.8541 0.5239 0.69100.8533 0.5106 0.67800.8526 0.4973 0.66510.8518 0.4839 0.65210.8510 0.4706 0.63920.8420 0.4447 0.61100.8330 0.4188 0.58270.8239 0.3930 0.55450.8149 0.3671 0.52630.8059 0.3412 0.49800.7969 0.3153 0.46980.7879 0.2894 0.44160.7788 0.2636 0.41340.7698 0.2377 0.38510.7608 0.2118 0.3569];set(gca,'CameraPosition',[2 2 2])hold onsurface(r.*cos(t),r.*sin(t),h,'EdgeAlpha',0.1,...'EdgeColor',[0.5 0.5 0.5],'FaceColor','interp')colormap(map)end

3 玫瑰配色

代码中变量map的数值可改变以绘制不同颜色玫瑰，这里提供一部分自己取的颜色数据。

颜色展示

c1

c2

c3

c4

c5

c6

c7

颜色数据自取

c1=[1.0000 0.6471 0.82750.9984 0.6353 0.81300.9969 0.6236 0.79850.9953 0.6118 0.78400.9937 0.6000 0.76950.9921 0.5882 0.75500.9906 0.5765 0.74040.9890 0.5647 0.72590.9874 0.5529 0.71140.9859 0.5412 0.69690.9843 0.5294 0.68240.9757 0.5149 0.67300.9670 0.5004 0.66360.9584 0.4859 0.65410.9498 0.4714 0.64470.9411 0.4568 0.63530.9325 0.4423 0.62590.9239 0.4278 0.61650.9153 0.4133 0.60700.9066 0.3988 0.59760.8980 0.3843 0.58820.8937 0.3780 0.57560.8894 0.3718 0.56310.8851 0.3655 0.55050.8808 0.3592 0.53800.8764 0.3529 0.52540.8721 0.3467 0.51290.8678 0.3404 0.50030.8635 0.3341 0.48780.8592 0.3279 0.47520.8549 0.3216 0.46270.8561 0.3165 0.45960.8573 0.3114 0.45640.8584 0.3063 0.45330.8596 0.3012 0.45020.8608 0.2961 0.44710.8620 0.2910 0.44390.8632 0.2859 0.44080.8643 0.2808 0.43770.8655 0.2757 0.43450.8667 0.2706 0.43140.8549 0.2620 0.41650.8432 0.2533 0.40160.8314 0.2447 0.38670.8196 0.2361 0.37180.8078 0.2274 0.35690.7961 0.2188 0.34200.7843 0.2102 0.32710.7725 0. 0.31220.7608 0.1929 0.29730.7490 0.1843 0.28240.7553 0.1827 0.28550.7616 0.1812 0.28870.7678 0.1796 0.29180.7741 0.1780 0.29490.7804 0.1764 0.29800.7867 0.1749 0.30120.7930 0.1733 0.30430.7992 0.1717 0.30740.8055 0.1702 0.31060.8118 0.1686 0.31370.7977 0.1631 0.30230.7836 0.1576 0.29100.7694 0.1521 0.27960.7553 0.1466 0.26820.7412 0.1411 0.25690.7271 0.1357 0.24550.7130 0.1302 0.23410.6988 0.1247 0.22270.6847 0.1192 0.21140.6706 0.1137 0.20000.6686 0.1141 0.19960.6667 0.1145 0.19920.6647 0.1149 0.19880.6628 0.1153 0.19840.6608 0.1157 0.19810.6588 0.1160 0.19770.6569 0.1164 0.19730.6549 0.1168 0.19690.6530 0.1172 0.19650.6510 0.1176 0.1961];c2=[0.2000 0.0941 0.35690.2063 0.0906 0.36630.2125 0.0870 0.37570.2188 0.0835 0.38510.2251 0.0800 0.39450.2314 0.0765 0.40400.2376 0.0729 0.41340.2439 0.0694 0.42280.2502 0.0659 0.43220.2564 0.0623 0.44160.2627 0.0588 0.45100.2670 0.0608 0.45370.2713 0.0627 0.45650.2757 0.0647 0.45920.2800 0.0666 0.46200.2843 0.0686 0.46470.2886 0.0706 0.46740.2929 0.0725 0.47020.2973 0.0745 0.47290.3016 0.0764 0.47570.3059 0.0784 0.47840.3267 0.0855 0.48110.3475 0.0925 0.48390.3682 0.0996 0.48660.3890 0.1066 0.48940.4098 0.1137 0.49210.4306 0.1208 0.49490.4514 0.1278 0.49770.4721 0.1349 0.50040.4929 0.1419 0.50310.5137 0.1490 0.50590.5255 0.1529 0.50550.5372 0.1568 0.50510.5490 0.1608 0.50470.5608 0.1647 0.50430.5726 0.1686 0.50400.5843 0.1725 0.50360.5961 0.1764 0.50320.6079 0.1804 0.50280.6196 0.1843 0.50240.6314 0.1882 0.50200.6553 0.1984 0.49490.6792 0.2086 0.48790.7032 0.2188 0.48080.7271 0.2290 0.47380.7510 0.2392 0.46670.7749 0.2494 0.45960.7988 0.2596 0.45260.8228 0.2698 0.44550.8467 0.2800 0.43850.8706 0.2902 0.43140.8765 0.3024 0.42470.8824 0.3145 0.41810.8882 0.3267 0.41140.8941 0.3388 0.40470.9000 0.3510 0.39810.9059 0.3632 0.39140.9118 0.3753 0.38470.9176 0.3875 0.37800.9235 0.3996 0.37140.9294 0.4118 0.36470.9341 0.4228 0.36590.9388 0.4338 0.36710.9435 0.4447 0.36820.9482 0.4557 0.36940.9529 0.4667 0.37060.9577 0.4777 0.37180.9624 0.4887 0.37300.9671 0.4996 0.37410.9718 0.5106 0.37530.9765 0.5216 0.37650.9785 0.5259 0.38080.9804 0.5302 0.38510.9824 0.5345 0.38940.9843 0.5388 0.39370.9863 0.5432 0.39810.9883 0.5475 0.40240.9902 0.5518 0.40670.9922 0.5561 0.41100.9941 0.5604 0.41530.9961 0.5647 0.41960.9965 0.5718 0.42240.9969 0.5788 0.42510.9973 0.5859 0.42790.9977 0.5929 0.43060.9980 0.6000 0.43340.9984 0.6071 0.43610.9988 0.6141 0.43880.9992 0.6212 0.44160.9996 0.6282 0.44431.0000 0.6353 0.44710.9992 0.6467 0.45490.9984 0.6580 0.46280.9977 0.6694 0.47060.9969 0.6808 0.47850.9961 0.6922 0.48630.9953 0.7035 0.49410.9945 0.7149 0.50200.9938 0.7263 0.50980.9930 0.7376 0.51770.9922 0.7490 0.52550.9930 0.7639 0.53800.9938 0.7788 0.55060.9945 0.7937 0.56320.9953 0.8086 0.57570.9961 0.8235 0.58820.9969 0.8384 0.60080.9977 0.8533 0.61330.9984 0.8682 0.62590.9992 0.8831 0.63841.0000 0.8980 0.65100.9984 0.9035 0.65650.9969 0.9090 0.66200.9953 0.9145 0.66750.9937 0.9200 0.67300.9921 0.9254 0.67840.9906 0.9309 0.68390.9890 0.9364 0.68940.9874 0.9419 0.69490.9859 0.9474 0.70040.9843 0.9529 0.7059];c3=[0.9176 0.9412 1.00000.9094 0.9341 0.99920.9011 0.9271 0.99840.8929 0.9200 0.99770.8847 0.9130 0.99690.8764 0.9059 0.99610.8682 0.8988 0.99530.8600 0.8918 0.99450.8518 0.8847 0.99380.8435 0.8777 0.99300.8353 0.8706 0.99220.8337 0.8698 0.99100.8322 0.8690 0.98980.8306 0.8682 0.98870.8290 0.8674 0.98750.8275 0.8667 0.98630.8259 0.8659 0.98510.8243 0.8651 0.98390.8227 0.8643 0.98280.8212 0.8635 0.98160.8196 0.8627 0.98040.8078 0.8521 0.97650.7961 0.8415 0.97260.7843 0.8310 0.96860.7726 0.8204 0.96470.7608 0.8098 0.96080.7490 0.7992 0.95690.7373 0.7886 0.95300.7255 0.7781 0.94900.7138 0.7675 0.94510.7020 0.7569 0.94120.6836 0.7400 0.93960.6651 0.7232 0.93810.6467 0.7063 0.93650.6282 0.6894 0.93490.6098 0.6725 0.93340.5914 0.6557 0.93180.5729 0.6388 0.93020.5545 0.6219 0.92860.5360 0.6051 0.92710.5176 0.5882 0.92550.5027 0.5776 0.92710.4878 0.5670 0.92860.4729 0.5565 0.93020.4580 0.5459 0.93180.4431 0.5353 0.93340.4282 0.5247 0.93490.4133 0.5141 0.93650.3984 0.5036 0.93810.3835 0.4930 0.93960.3686 0.4824 0.94120.3623 0.4742 0.94040.3561 0.4659 0.93960.3498 0.4577 0.93880.3435 0.4494 0.93800.3372 0.4412 0.93730.3310 0.4330 0.93650.3247 0.4247 0.93570.3184 0.4165 0.93490.3122 0.4082 0.93410.3059 0.4000 0.93330.2981 0.3918 0.92350.2902 0.3835 0.91370.2824 0.3753 0.90390.2745 0.3670 0.89410.2667 0.3588 0.88430.2589 0.3506 0.87450.2510 0.3423 0.86470.2432 0.3341 0.85490.2353 0.3258 0.84510.2275 0.3176 0.83530.2169 0.3086 0.81650.2063 0.2996 0.79770.1957 0.2906 0.77880.1851 0.2816 0.76000.1746 0.2726 0.74120.1640 0.2635 0.72240.1534 0.2545 0.70360.1428 0.2455 0.68470.1322 0.2365 0.66590.1216 0.2275 0.6471];c4=[0.9176 0.7490 0.37650.9188 0.7513 0.38790.9200 0.7537 0.39920.9211 0.7560 0.41060.9223 0.7584 0.42200.9235 0.7608 0.43340.9247 0.7631 0.44470.9259 0.7654 0.45610.9270 0.7678 0.46750.9282 0.7702 0.47880.9294 0.7725 0.49020.9298 0.7698 0.50080.9302 0.7670 0.51140.9306 0.7643 0.52200.9310 0.7615 0.53260.9314 0.7588 0.54320.9317 0.7561 0.55370.9321 0.7533 0.56430.9325 0.7506 0.57490.9329 0.7478 0.58550.9333 0.7451 0.59610.9290 0.7404 0.58940.9247 0.7357 0.58280.9204 0.7310 0.57610.9161 0.7263 0.56940.9118 0.7215 0.56270.9074 0.7168 0.55610.9031 0.7121 0.54940.8988 0.7074 0.54270.8945 0.7027 0.53610.8902 0.6980 0.52940.8890 0.6976 0.53880.8878 0.6972 0.54820.8867 0.6968 0.55760.8855 0.6964 0.56700.8843 0.6961 0.57650.8831 0.6957 0.58590.8819 0.6953 0.59530.8808 0.6949 0.60470.8796 0.6945 0.61410.8784 0.6941 0.62350.8827 0.6988 0.63640.8870 0.7035 0.64940.8914 0.7082 0.66230.8957 0.7129 0.67530.9000 0.7177 0.68820.9043 0.7224 0.70110.9086 0.7271 0.71410.9130 0.7318 0.72700.9173 0.7365 0.74000.9216 0.7412 0.75290.9153 0.7275 0.75450.9090 0.7137 0.75600.9028 0.7000 0.75760.8965 0.6863 0.75920.8902 0.6725 0.76080.8839 0.6588 0.76230.8776 0.6451 0.76390.8714 0.6314 0.76550.8651 0.6176 0.76700.8588 0.6039 0.76860.8580 0.5906 0.75570.8572 0.5772 0.74270.8565 0.5639 0.72980.8557 0.5506 0.71680.8549 0.5373 0.70390.8541 0.5239 0.69100.8533 0.5106 0.67800.8526 0.4973 0.66510.8518 0.4839 0.65210.8510 0.4706 0.63920.8420 0.4447 0.61100.8330 0.4188 0.58270.8239 0.3930 0.55450.8149 0.3671 0.52630.8059 0.3412 0.49800.7969 0.3153 0.46980.7879 0.2894 0.44160.7788 0.2636 0.41340.7698 0.2377 0.38510.7608 0.2118 0.3569];c5=[0.3451 0.1020 0.14510.3667 0.1126 0.16160.3882 0.1232 0.17800.4098 0.1337 0.19450.4314 0.1443 0.21100.4529 0.1549 0.22750.4745 0.1655 0.24390.4961 0.1761 0.26040.5177 0.1866 0.27690.5392 0.1972 0.29330.5608 0.2078 0.30980.5675 0.2204 0.32000.5741 0.2329 0.33020.5808 0.2454 0.34040.5875 0.2580 0.35060.5941 0.2706 0.36080.6008 0.2831 0.37100.6075 0.2957 0.38120.6142 0.3082 0.39140.6208 0.3208 0.40160.6275 0.3333 0.41180.6318 0.3388 0.41730.6361 0.3443 0.42280.6404 0.3498 0.42830.6447 0.3553 0.43380.6490 0.3608 0.43930.6534 0.3662 0.44470.6577 0.3717 0.45020.6620 0.3772 0.45570.6663 0.3827 0.46120.6706 0.3882 0.46670.6788 0.4007 0.47850.6871 0.4133 0.49020.6953 0.4259 0.50200.7035 0.4384 0.51370.7117 0.4510 0.52550.7200 0.4635 0.53730.7282 0.4760 0.54900.7364 0.4886 0.56080.7447 0.5012 0.57250.7529 0.5137 0.58430.7584 0.5223 0.59210.7639 0.5310 0.60000.7694 0.5396 0.60780.7749 0.5482 0.61570.7803 0.5569 0.62350.7858 0.5655 0.63130.7913 0.5741 0.63920.7968 0.5827 0.64700.8023 0.5914 0.65490.8078 0.6000 0.66270.8090 0.6086 0.67050.8102 0.6173 0.67840.8113 0.6259 0.68620.8125 0.6345 0.69410.8137 0.6431 0.70190.8149 0.6518 0.70980.8161 0.6604 0.71760.8172 0.6690 0.72550.8184 0.6777 0.73330.8196 0.6863 0.74120.8192 0.6832 0.73880.8188 0.6800 0.73650.8184 0.6769 0.73410.8180 0.6737 0.73180.8176 0.6706 0.72940.8173 0.6675 0.72700.8169 0.6643 0.72470.8165 0.6612 0.72230.8161 0.6580 0.72000.8157 0.6549 0.7176];c6=[0.3451 0.6275 0.72550.3557 0.6314 0.72750.3663 0.6353 0.72940.3769 0.6393 0.73140.3875 0.6432 0.73330.3981 0.6471 0.73530.4086 0.6510 0.73730.4192 0.6549 0.73920.4298 0.6589 0.74120.4404 0.6628 0.74310.4510 0.6667 0.74510.4592 0.6675 0.74280.4675 0.6683 0.74040.4757 0.6690 0.73800.4839 0.6698 0.73570.4921 0.6706 0.73330.5004 0.6714 0.73100.5086 0.6722 0.72870.5168 0.6729 0.72630.5251 0.6737 0.72390.5333 0.6745 0.72160.5400 0.6761 0.72080.5466 0.6776 0.72000.5533 0.6792 0.71920.5600 0.6808 0.71840.5666 0.6824 0.71770.5733 0.6839 0.71690.5800 0.6855 0.71610.5867 0.6871 0.71530.5933 0.6886 0.71450.6000 0.6902 0.71370.6071 0.6941 0.71720.6141 0.6980 0.72080.6212 0.7020 0.72430.6282 0.7059 0.72780.6353 0.7098 0.73130.6424 0.7137 0.73490.6494 0.7176 0.73840.6565 0.7216 0.74190.6635 0.7255 0.74550.6706 0.7294 0.74900.6773 0.7357 0.75450.6839 0.7420 0.76000.6906 0.7482 0.76550.6973 0.7545 0.77100.7039 0.7608 0.77640.7106 0.7671 0.78190.7173 0.7734 0.78740.7240 0.7796 0.79290.7306 0.7859 0.79840.7373 0.7922 0.80390.7483 0.7926 0.80080.7593 0.7930 0.79760.7702 0.7934 0.79450.7812 0.7938 0.79130.7922 0.7942 0.78820.8032 0.7945 0.78510.8142 0.7949 0.78190.8251 0.7953 0.77880.8361 0.7957 0.77560.8471 0.7961 0.77250.8498 0.7973 0.77330.8526 0.7984 0.77410.8553 0.7996 0.77490.8581 0.8008 0.77570.8608 0.8019 0.77640.8635 0.8031 0.77720.8663 0.8043 0.77800.8690 0.8055 0.77880.8718 0.8066 0.77960.8745 0.8078 0.7804];c7=[0.5922 0.7098 0.74900.6051 0.7094 0.74350.6181 0.7090 0.73800.6310 0.7086 0.73250.6440 0.7082 0.72700.6569 0.7078 0.72160.6698 0.7075 0.71610.6828 0.7071 0.71060.6957 0.7067 0.70510.7087 0.7063 0.69960.7216 0.7059 0.69410.7314 0.7090 0.69650.7412 0.7122 0.69880.7510 0.7153 0.70120.7608 0.7185 0.70350.7706 0.7216 0.70590.7804 0.7247 0.70820.7902 0.7279 0.71060.8000 0.7310 0.71290.8098 0.7342 0.71530.8196 0.7373 0.71760.8372 0.7432 0.71720.8549 0.7491 0.71680.8726 0.7549 0.71640.8902 0.7608 0.71600.9079 0.7667 0.71570.9255 0.7726 0.71530.9432 0.7785 0.71490.9608 0.7843 0.71450.9785 0.7902 0.71410.9961 0.7961 0.71370.9965 0.7937 0.71020.9969 0.7914 0.70660.9973 0.7890 0.70310.9977 0.7867 0.69960.9980 0.7843 0.69610.9984 0.7819 0.69250.9988 0.7796 0.68900.9992 0.7772 0.68550.9996 0.7749 0.68191.0000 0.7725 0.67841.0000 0.7643 0.67131.0000 0.7560 0.66431.0000 0.7478 0.65721.0000 0.7396 0.65021.0000 0.7313 0.64311.0000 0.7231 0.63601.0000 0.7149 0.62901.0000 0.7067 0.62191.0000 0.6984 0.61491.0000 0.6902 0.60780.9996 0.6824 0.59680.9992 0.6745 0.58580.9988 0.6667 0.57490.9984 0.6588 0.56390.9980 0.6510 0.55290.9977 0.6432 0.54190.9973 0.6353 0.53090.9969 0.6275 0.52000.9965 0.6196 0.50900.9961 0.6118 0.49800.9965 0.6067 0.49090.9969 0.6016 0.48390.9973 0.5965 0.47680.9977 0.5914 0.46980.9980 0.5863 0.46270.9984 0.5812 0.45570.9988 0.5761 0.44860.9992 0.5710 0.44160.9996 0.5659 0.43461.0000 0.5608 0.42750.9969 0.5522 0.41730.9937 0.5435 0.40710.9906 0.5349 0.39690.9874 0.5263 0.38670.9843 0.5176 0.37650.9812 0.5090 0.36630.9780 0.5004 0.35610.9749 0.4918 0.34590.9717 0.4831 0.33570.9686 0.4745 0.3255];

4.旋转版本

改动很小，就是最后一小段稍有变动

function drawrose2grid on[x,t]=meshgrid((0:24)./24,(0:0.5:575)./575.*20.*pi-4*pi);p=(pi/2)*exp(-t./(8*pi));change=sin(20*t)/150;u=1-(1-mod(3.3*t,2*pi)./pi).^4./2+change;y=2*(x.^2-x).^2.*sin(p);r=u.*(x.*sin(p)+y.*cos(p)).*1.5;h=u.*(x.*cos(p)-y.*sin(p));map=[0.9176 0.7490 0.37650.9188 0.7513 0.38790.9200 0.7537 0.39920.9211 0.7560 0.41060.9223 0.7584 0.42200.9235 0.7608 0.43340.9247 0.7631 0.44470.9259 0.7654 0.45610.9270 0.7678 0.46750.9282 0.7702 0.47880.9294 0.7725 0.49020.9298 0.7698 0.50080.9302 0.7670 0.51140.9306 0.7643 0.52200.9310 0.7615 0.53260.9314 0.7588 0.54320.9317 0.7561 0.55370.9321 0.7533 0.56430.9325 0.7506 0.57490.9329 0.7478 0.58550.9333 0.7451 0.59610.9290 0.7404 0.58940.9247 0.7357 0.58280.9204 0.7310 0.57610.9161 0.7263 0.56940.9118 0.7215 0.56270.9074 0.7168 0.55610.9031 0.7121 0.54940.8988 0.7074 0.54270.8945 0.7027 0.53610.8902 0.6980 0.52940.8890 0.6976 0.53880.8878 0.6972 0.54820.8867 0.6968 0.55760.8855 0.6964 0.56700.8843 0.6961 0.57650.8831 0.6957 0.58590.8819 0.6953 0.59530.8808 0.6949 0.60470.8796 0.6945 0.61410.8784 0.6941 0.62350.8827 0.6988 0.63640.8870 0.7035 0.64940.8914 0.7082 0.66230.8957 0.7129 0.67530.9000 0.7177 0.68820.9043 0.7224 0.70110.9086 0.7271 0.71410.9130 0.7318 0.72700.9173 0.7365 0.74000.9216 0.7412 0.75290.9153 0.7275 0.75450.9090 0.7137 0.75600.9028 0.7000 0.75760.8965 0.6863 0.75920.8902 0.6725 0.76080.8839 0.6588 0.76230.8776 0.6451 0.76390.8714 0.6314 0.76550.8651 0.6176 0.76700.8588 0.6039 0.76860.8580 0.5906 0.75570.8572 0.5772 0.74270.8565 0.5639 0.72980.8557 0.5506 0.71680.8549 0.5373 0.70390.8541 0.5239 0.69100.8533 0.5106 0.67800.8526 0.4973 0.66510.8518 0.4839 0.65210.8510 0.4706 0.63920.8420 0.4447 0.61100.8330 0.4188 0.58270.8239 0.3930 0.55450.8149 0.3671 0.52630.8059 0.3412 0.49800.7969 0.3153 0.46980.7879 0.2894 0.44160.7788 0.2636 0.41340.7698 0.2377 0.38510.7608 0.2118 0.3569];set(gca,'CameraPosition',[2 2 2])hold onXset=r.*cos(t);Yset=r.*sin(t);sf=surface(Xset,Yset,h,'EdgeAlpha',0.1,...'EdgeColor',[0.5 0.5 0.5],'FaceColor','interp');colormap(map)theta=0;while 1theta=theta+0.02;set(sf,'XData',Xset.*cos(theta)-Yset.*sin(theta),...'YData',Xset.*sin(theta)+Yset.*cos(theta))pause(0.01)endend