Fw: [認真] 數學的魅力 乳房
※ [本文轉錄自 sex 看板 #1FNtCaJ8 ]
作者: IMDB (^^) 站內: sex
標題: [認真] 數學的魅力 乳房
時間: Wed Mar 14 00:17:37 2012
乳房輪廓線
http://att.newsmth.net/att.php?s.382.810342.331.jpg
相應的matlab代碼如下﹕
% 乳房輪廓線
fun = @(x,a,b)a.*x.*log10(x)-(1/b).*exp(-((b.*x-b./exp(1)).^4));
x = 0:0.01:1;
y1 = fun(x,3,30);
y2 = fun(x,2.5,36);
y3 = fun(x,2,50);
figure;
plot(y1,x,'k');
hold on
plot(y2,x,'r');
plot(y3,x);
text('Interpreter','latex',...
'String',['$$f(x) = 3xlog_{10}x-\frac{1}{30}e^{-(30x-\frac{30}'...
'{e})^4}$$'],'Position',[-1.1,0.85],...
'FontSize',18,'color','k');
text('Interpreter','latex',...
'String',['$$g(x) = 2.5xlog_{10}x-\frac{1}{36}e^{-(36x-\frac{36}'...
'{e})^4}$$'],'Position',[-1.1,0.6],...
'FontSize',18,'color','r');
text('Interpreter','latex',...
'String',['$$h(x) = 2xlog_{10}x-\frac{1}{50}e^{-(50x-\frac{50}'...
'{e})^4}$$'],'Position',[-1.1,0.35],...
'FontSize',18,'color','b');
axis equal;
axis([-1.2,0,0,1])
% 單乳房曲面(三維)
[X, Y] = meshgrid(0.01:0.01:1, 0.01:0.01:1);
Z = 11*X.*log10(X).*Y.*(Y-1)+exp(-((25 ...
*X - 25/exp(1)).^2+(25*Y-25/2).^2).^3)./25;
figure;
surf(Y,Z,X,'FaceColor',[1 0.75 0.65],'linestyle','none');
view([116 30]);
axis equal;
camlight;
lighting phong; % 設置光照和光照模式
title(['$$F(x,y) = 12.5x(log_{10}x)y(y-1)-\frac{1}{25}'...
'e^{-[(25x-25/e)^2+(25y-12.5)^2]^3}$$'],...
'Interpreter','latex','FontSize',18,'color','k');
% 雙乳房曲面(三維)
[X, Y] = meshgrid(0.01:0.01:1, 0.01:0.01:1);
Zfun =@(x,y)12.5*x.*log10(x).*y.*(y-1)+exp(-((25 ...
*x - 25/exp(1)).^2+(25*y-25/2).^2).^3)./25;
Z = Zfun(X,Y);
figure;
surf(Y,Z,X,'FaceColor',[1 0.75 0.65],'linestyle','none');
hold on
surf(Y+0.98,Z,X,'FaceColor',[1 0.75 0.65],'linestyle','none');
axis equal;
view([116 30]);
camlight;
lighting phong; % 設置光照和光照模式
來源
http://www.newsmth.net/bbscon.php?bid=382&id=810342
http://www.newsmth.net/bbscon.php?bid=382&id=810343
--
※ 發信站: 批踢踢實業坊(ptt.cc)
◆ From: 61.58.102.239
→
03/14 00:19, , 1F
03/14 00:19, 1F
→
03/14 00:20, , 2F
03/14 00:20, 2F
推
03/14 00:20, , 3F
03/14 00:20, 3F
→
03/14 00:20, , 4F
03/14 00:20, 4F
→
03/14 00:20, , 5F
03/14 00:20, 5F
推
03/14 00:20, , 6F
03/14 00:20, 6F
推
03/14 00:23, , 7F
03/14 00:23, 7F
推
03/14 00:23, , 8F
03/14 00:23, 8F
→
03/14 00:23, , 9F
03/14 00:23, 9F
推
03/14 00:24, , 10F
03/14 00:24, 10F
噓
03/14 00:24, , 11F
03/14 00:24, 11F
推
03/14 00:25, , 12F
03/14 00:25, 12F
推
03/14 00:25, , 13F
03/14 00:25, 13F
推
03/14 00:25, , 14F
03/14 00:25, 14F
噓
03/14 00:25, , 15F
03/14 00:25, 15F
推
03/14 00:27, , 16F
03/14 00:27, 16F
推
03/14 00:28, , 17F
03/14 00:28, 17F
推
03/14 00:31, , 18F
03/14 00:31, 18F
推
03/14 00:32, , 19F
03/14 00:32, 19F
推
03/14 00:32, , 20F
03/14 00:32, 20F
推
03/14 00:33, , 21F
03/14 00:33, 21F
推
03/14 00:33, , 22F
03/14 00:33, 22F
推
03/14 00:35, , 23F
03/14 00:35, 23F
推
03/14 00:36, , 24F
03/14 00:36, 24F
推
03/14 00:36, , 25F
03/14 00:36, 25F
推
03/14 00:36, , 26F
03/14 00:36, 26F
推
03/14 00:39, , 27F
03/14 00:39, 27F
推
03/14 00:39, , 28F
03/14 00:39, 28F
推
03/14 00:39, , 29F
03/14 00:39, 29F
推
03/14 00:39, , 30F
03/14 00:39, 30F
推
03/14 00:39, , 31F
03/14 00:39, 31F
推
03/14 00:40, , 32F
03/14 00:40, 32F
推
03/14 00:40, , 33F
03/14 00:40, 33F
推
03/14 00:41, , 34F
03/14 00:41, 34F
推
03/14 00:41, , 35F
03/14 00:41, 35F
推
03/14 00:41, , 36F
03/14 00:41, 36F
推
03/14 00:41, , 37F
03/14 00:41, 37F
推
03/14 00:43, , 38F
03/14 00:43, 38F
推
03/14 00:44, , 39F
03/14 00:44, 39F
還有 67 則推文
→
03/14 02:20, , 107F
03/14 02:20, 107F
推
03/14 02:22, , 108F
03/14 02:22, 108F
推
03/14 02:27, , 109F
03/14 02:27, 109F
推
03/14 02:29, , 110F
03/14 02:29, 110F
推
03/14 02:32, , 111F
03/14 02:32, 111F
推
03/14 02:35, , 112F
03/14 02:35, 112F
推
03/14 02:39, , 113F
03/14 02:39, 113F
推
03/14 02:43, , 114F
03/14 02:43, 114F
推
03/14 02:47, , 115F
03/14 02:47, 115F
推
03/14 02:52, , 116F
03/14 02:52, 116F
推
03/14 02:57, , 117F
03/14 02:57, 117F
推
03/14 02:57, , 118F
03/14 02:57, 118F
推
03/14 02:59, , 119F
03/14 02:59, 119F
推
03/14 03:05, , 120F
03/14 03:05, 120F
→
03/14 03:45, , 121F
03/14 03:45, 121F
推
03/14 03:49, , 122F
03/14 03:49, 122F
推
03/14 04:04, , 123F
03/14 04:04, 123F
推
03/14 04:10, , 124F
03/14 04:10, 124F
推
03/14 04:25, , 125F
03/14 04:25, 125F
推
03/14 04:45, , 126F
03/14 04:45, 126F
推
03/14 05:08, , 127F
03/14 05:08, 127F
推
03/14 05:15, , 128F
03/14 05:15, 128F
推
03/14 05:45, , 129F
03/14 05:45, 129F
推
03/14 07:16, , 130F
03/14 07:16, 130F
推
03/14 07:45, , 131F
03/14 07:45, 131F
推
03/14 07:47, , 132F
03/14 07:47, 132F
推
03/14 08:01, , 133F
03/14 08:01, 133F
推
03/14 08:12, , 134F
03/14 08:12, 134F
推
03/14 08:13, , 135F
03/14 08:13, 135F
推
03/14 08:21, , 136F
03/14 08:21, 136F
推
03/14 08:21, , 137F
03/14 08:21, 137F
※ Winson1017:轉錄至看板 KS98-302 03/14 08:30
推
03/14 08:30, , 138F
03/14 08:30, 138F
推
03/14 08:37, , 139F
03/14 08:37, 139F
※ 發信站: 批踢踢實業坊(ptt.cc)
※ 轉錄者: q920110 (118.161.145.226), 時間: 03/14/2012 08:37:24
→
03/14 08:38, , 140F
03/14 08:38, 140F
推
03/14 22:22, , 141F
03/14 22:22, 141F
噓
03/14 22:23, , 142F
03/14 22:23, 142F
推
03/15 11:54, , 143F
03/15 11:54, 143F
推
03/15 13:46, , 144F
03/15 13:46, 144F