Re: ContourPlot under ListPlot3D
- To: mathgroup at smc.vnet.net
- Subject: [mg112656] Re: ContourPlot under ListPlot3D
- From: Szymon Roziewski <szymon.roziewski at gmail.com>
- Date: Sat, 25 Sep 2010 02:19:20 -0400 (EDT)
Ok,
then these are my data:
{{0.0108186, 0.0403757, 0.}, {0.0295571, 0.0295571, 0.}, {0.0403757,
0.0108186, 0.}, {0.0403757, -0.0108186, 0.}, {0.0295571, -0.0295571,
0.}, {0.0108186, -0.0403757, 0.}, {-0.0108186, -0.0403757,
0.}, {-0.0295571, -0.0295571, 0.}, {-0.0403757, -0.0108186,
0.}, {-0.0403757, 0.0108186, 0.}, {-0.0295571, 0.0295571,
0.}, {-0.0108186, 0.0403757, 0.}, {0.0118798, 0.044336,
0.}, {0.0324562, 0.0324562, 0.}, {0.044336, 0.0118798,
0.}, {0.044336, -0.0118798, 0.}, {0.0324562, -0.0324562,
0.}, {0.0118798, -0.044336, 0.}, {-0.0118798, -0.044336,
0.}, {-0.0324562, -0.0324562, 0.}, {-0.044336, -0.0118798,
0.}, {-0.044336, 0.0118798, 0.}, {-0.0324562, 0.0324562,
0.}, {-0.0118798, 0.044336, 0.}, {0.0130704, 0.0487793,
0.}, {0.0357089, 0.0357089, 0.}, {0.0487793, 0.0130704,
0.}, {0.0487793, -0.0130704, 0.}, {0.0357089, -0.0357089,
0.}, {0.0130704, -0.0487793, 0.}, {-0.0130704, -0.0487793,
0.}, {-0.0357089, -0.0357089, 0.}, {-0.0487793, -0.0130704,
0.}, {-0.0487793, 0.0130704, 0.}, {-0.0357089, 0.0357089,
0.}, {-0.0130704, 0.0487793, 0.}, {0.0143903, 0.0537055,
0.}, {0.0393151, 0.0393151, 0.}, {0.0537055, 0.0143903,
0.}, {0.0537055, -0.0143903, 0.}, {0.0393151, -0.0393151,
0.}, {0.0143903, -0.0537055, 0.}, {-0.0143903, -0.0537055,
0.}, {-0.0393151, -0.0393151, 0.}, {-0.0537055, -0.0143903,
0.}, {-0.0537055, 0.0143903, 0.}, {-0.0393151, 0.0393151,
0.}, {-0.0143903, 0.0537055, 0.}, {0.0158397, 0.0591147,
0.}, {0.0432749, 0.0432749, 0.}, {0.0591147, 0.0158397,
0.}, {0.0591147, -0.0158397, 0.}, {0.0432749, -0.0432749,
0.}, {0.0158397, -0.0591147, 0.}, {-0.0158397, -0.0591147,
0.}, {-0.0432749, -0.0432749, 0.}, {-0.0591147, -0.0158397,
0.}, {-0.0591147, 0.0158397, 0.}, {-0.0432749, 0.0432749,
0.}, {-0.0158397, 0.0591147, 0.}, {0.0174185, 0.0650068,
0.}, {0.0475883, 0.0475883, 0.}, {0.0650068, 0.0174185,
0.}, {0.0650068, -0.0174185, 0.}, {0.0475883, -0.0475883,
0.}, {0.0174185, -0.0650068, 0.}, {-0.0174185, -0.0650068,
0.}, {-0.0475883, -0.0475883, 0.}, {-0.0650068, -0.0174185,
0.}, {-0.0650068, 0.0174185, 0.}, {-0.0475883, 0.0475883,
0.}, {-0.0174185, 0.0650068, 0.}, {0.0191526, 0.0714785,
0.}, {0.0523259, 0.0523259, 0.}, {0.0714785, 0.0191526,
0.}, {0.0714785, -0.0191526, 0.}, {0.0523259, -0.0523259,
0.}, {0.0191526, -0.0714785, 0.}, {-0.0191526, -0.0714785,
0.}, {-0.0523259, -0.0523259, 0.}, {-0.0714785, -0.0191526,
0.}, {-0.0714785, 0.0191526, 0.}, {-0.0523259, 0.0523259,
0.}, {-0.0191526, 0.0714785, 0.}, {0.0210679, 0.0786264,
0.}, {0.0575585, 0.0575585, 0.}, {0.0786264, 0.0210679,
0.}, {0.0786264, -0.0210679, 0.}, {0.0575585, -0.0575585,
0.}, {0.0210679, -0.0786264, 0.}, {-0.0210679, -0.0786264,
0.}, {-0.0575585, -0.0575585, 0.}, {-0.0786264, -0.0210679,
0.}, {-0.0786264, 0.0210679, 0.}, {-0.0575585, 0.0575585,
0.}, {-0.0210679, 0.0786264, 0.}, {0.0231643, 0.0864504,
0.}, {0.0632861, 0.0632861, 0.}, {0.0864504, 0.0231643,
0.}, {0.0864504, -0.0231643, 0.}, {0.0632861, -0.0632861,
0.}, {0.0231643, -0.0864504, 0.}, {-0.0231643, -0.0864504,
0.}, {-0.0632861, -0.0632861, 0.}, {-0.0864504, -0.0231643,
0.}, {-0.0864504, 0.0231643, 0.}, {-0.0632861, 0.0632861,
0.}, {-0.0231643, 0.0864504, 0.}, {0.0254937, 0.0951437,
0.}, {0.06965, 0.06965, 0.}, {0.0951437, 0.0254937,
0.}, {0.0951437, -0.0254937, 0.}, {0.06965, -0.06965,
0.}, {0.0254937, -0.0951437, 0.}, {-0.0254937, -0.0951437,
0.}, {-0.06965, -0.06965, 0.}, {-0.0951437, -0.0254937,
0.}, {-0.0951437, 0.0254937, 0.}, {-0.06965, 0.06965,
0.}, {-0.0254937, 0.0951437, 0.}, {0.0280301, 0.10461,
0.}, {0.0765797, 0.0765797, 0.}, {0.10461, 0.0280301,
0.}, {0.10461, -0.0280301, 0.}, {0.0765797, -0.0765797,
0.}, {0.0280301, -0.10461, 0.}, {-0.0280301, -0.10461,
0.}, {-0.0765797, -0.0765797, 0.}, {-0.10461, -0.0280301,
0.}, {-0.10461, 0.0280301, 0.}, {-0.0765797, 0.0765797,
0.}, {-0.0280301, 0.10461, 0.}, {0.0308512, 0.115138,
0.}, {0.0842871, 0.0842871, 0.}, {0.115138, 0.0308512,
0.}, {0.115138, -0.0308512, 0.}, {0.0842871, -0.0842871,
0.}, {0.0308512, -0.115138, 0.}, {-0.0308512, -0.115138,
0.}, {-0.0842871, -0.0842871, 0.}, {-0.115138, -0.0308512,
0.}, {-0.115138, 0.0308512, 0.001}, {-0.0842871, 0.0842871,
0.001}, {-0.0308512, 0.115138, 0.001}, {0.0339312, 0.126633,
0.003}, {0.0927017, 0.0927017, 0.}, {0.126633, 0.0339312,
0.}, {0.126633, -0.0339312, 0.}, {0.0927017, -0.0927017,
0.}, {0.0339312, -0.126633, 0.}, {-0.0339312, -0.126633,
0.}, {-0.0927017, -0.0927017, 0.001}, {-0.126633, -0.0339312,
0.005}, {-0.126633, 0.0339312, 0.008}, {-0.0927017, 0.0927017,
0.009}, {-0.0339312, 0.126633, 0.008}, {0.0373217, 0.139287,
0.022}, {0.101965, 0.101965, 0.003}, {0.139287, 0.0373217,
0.}, {0.139287, -0.0373217, 0.}, {0.101965, -0.101965,
0.}, {0.0373217, -0.139287, 0.}, {-0.0373217, -0.139287,
0.}, {-0.101965, -0.101965, 0.004}, {-0.139287, -0.0373217,
0.03}, {-0.139287, 0.0373217, 0.052}, {-0.101965, 0.101965,
0.06}, {-0.0373217, 0.139287, 0.05}, {0.0410487, 0.153196,
0.063}, {0.112147, 0.112147, 0.007}, {0.153196, 0.0410487,
0.}, {0.153196, -0.0410487, 0.}, {0.112147, -0.112147,
0.}, {0.0410487, -0.153196, 0.}, {-0.0410487, -0.153196,
0.}, {-0.112147, -0.112147, 0.01}, {-0.153196, -0.0410487,
0.087}, {-0.153196, 0.0410487, 0.166}, {-0.112147, 0.112147,
0.199}, {-0.0410487, 0.153196, 0.156}, {0.0451639, 0.168554,
0.098}, {0.12339, 0.12339, 0.009}, {0.168554, 0.0451639,
0.}, {0.168554, -0.0451639, 0.}, {0.12339, -0.12339,
0.}, {0.0451639, -0.168554, 0.}, {-0.0451639, -0.168554,
0.}, {-0.12339, -0.12339, 0.013}, {-0.168554, -0.0451639,
0.13}, {-0.168554, 0.0451639, 0.253}, {-0.12339, 0.12339,
0.3}, {-0.0451639, 0.168554, 0.237}, {0.0496674, 0.185361,
0.23}, {0.135694, 0.135694, 0.019}, {0.185361, 0.0496674,
0.}, {0.185361, -0.0496674, 0.}, {0.135694, -0.135694,
0.}, {0.0496674, -0.185361, 0.}, {-0.0496674, -0.185361,
0.}, {-0.135694, -0.135694, 0.026}, {-0.185361, -0.0496674,
0.291}, {-0.185361, 0.0496674, 0.578}, {-0.135694, 0.135694,
0.666}, {-0.0496674, 0.185361, 0.547}, {0.0546367, 0.203907,
0.211}, {0.14927, 0.14927, 0.018}, {0.203907, 0.0546367,
0.}, {0.203907, -0.0546367, 0.}, {0.14927, -0.14927,
0.}, {0.0546367, -0.203907, 0.}, {-0.0546367, -0.203907,
0.}, {-0.14927, -0.14927, 0.022}, {-0.203907, -0.0546367,
0.249}, {-0.203907, 0.0546367, 0.465}, {-0.14927, 0.14927,
0.521}, {-0.0546367, 0.203907, 0.447}, {0.0601237, 0.224385,
0.089}, {0.164261, 0.164261, 0.008}, {0.224385, 0.0601237,
0.}, {0.224385, -0.0601237, 0.}, {0.164261, -0.164261,
0.}, {0.0601237, -0.224385, 0.}, {-0.0601237, -0.224385,
0.}, {-0.164261, -0.164261, 0.009}, {-0.224385, -0.0601237,
0.1}, {-0.224385, 0.0601237, 0.184}, {-0.164261, 0.164261,
0.201}, {-0.0601237, 0.224385, 0.179}, {0.0661283, 0.246794,
0.052}, {0.180666, 0.180666, 0.007}, {0.246794, 0.0661283,
0.}, {0.246794, -0.0661283, 0.}, {0.180666, -0.180666,
0.}, {0.0661283, -0.246794, 0.}, {-0.0661283, -0.246794,
0.}, {-0.180666, -0.180666, 0.007}, {-0.246794, -0.0661283,
0.055}, {-0.246794, 0.0661283, 0.09}, {-0.180666, 0.180666,
0.106}, {-0.0661283, 0.246794, 0.086}, {0.0661283, 0.246794,
0.033}, {0.180666, 0.180666, 0.006}, {0.246794, 0.0661283,
0.}, {0.246794, -0.0661283, 0.}, {0.180666, -0.180666,
0.}, {0.0661283, -0.246794, 0.}, {-0.0661283, -0.246794,
0.}, {-0.180666, -0.180666, 0.005}, {-0.246794, -0.0661283,
0.034}, {-0.246794, 0.0661283, 0.057}, {-0.180666, 0.180666,
0.078}, {-0.0661283, 0.246794, 0.054}, {0.080001, 0.298568,
0.027}, {0.218567, 0.218567, 0.006}, {0.298568, 0.080001,
0.}, {0.298568, -0.080001, 0.}, {0.218567, -0.218567,
0.}, {0.080001, -0.298568, 0.}, {-0.080001, -0.298568,
0.}, {-0.218567, -0.218567, 0.005}, {-0.298568, -0.080001,
0.028}, {-0.298568, 0.080001, 0.042}, {-0.218567, 0.218567,
0.053}, {-0.080001, 0.298568, 0.041}, {0.0879985, 0.328415,
0.021}, {0.240416, 0.240416, 0.005}, {0.328415, 0.0879985,
0.}, {0.328415, -0.0879985, 0.}, {0.240416, -0.240416,
0.}, {0.0879985, -0.328415, 0.}, {-0.0879985, -0.328415,
0.}, {-0.240416, -0.240416, 0.005}, {-0.328415, -0.0879985,
0.022}, {-0.328415, 0.0879985, 0.031}, {-0.240416, 0.240416,
0.036}, {-0.0879985, 0.328415, 0.031}, {0.0967983, 0.361256,
0.013}, {0.264458, 0.264458, 0.004}, {0.361256, 0.0967983,
0.}, {0.361256, -0.0967983, 0.}, {0.264458, -0.264458,
0.}, {0.0967983, -0.361256, 0.}, {-0.0967983, -0.361256,
0.}, {-0.264458, -0.264458, 0.003}, {-0.361256, -0.0967983,
0.013}, {-0.361256, 0.0967983, 0.019}, {-0.264458, 0.264458,
0.023}, {-0.0967983, 0.361256, 0.018}, {0.106478, 0.397382,
0.008}, {0.290904, 0.290904, 0.003}, {0.397382, 0.106478,
0.}, {0.397382, -0.106478, 0.}, {0.290904, -0.290904,
0.}, {0.106478, -0.397382, 0.}, {-0.106478, -0.397382,
0.}, {-0.290904, -0.290904, 0.002}, {-0.397382, -0.106478,
0.008}, {-0.397382, 0.106478, 0.011}, {-0.290904, 0.290904,
0.013}, {-0.106478, 0.397382, 0.011}}
MyColorData[z_] :=
Which[
0.02 < z <= 0.1, RGBColor[0.61, 0.52, 0.83],
0.1 < z <= 0.2, RGBColor[0.33, 0, 0.89],
0.2 < z <= 0.3, RGBColor[0, 0.45, 0.76],
0.3 < z <= 0.4, RGBColor[0, 0.45, 0.23],
0.4 < z <= 0.5, RGBColor[0.25, 0.76, 0.06],
0.5 < z <= 0.6, RGBColor[1, 0.92, 0],
0.6 < z <= 0.7, RGBColor[1, 0, 0],
0.7 < z <= 0.8, RGBColor[0.35, 0, 0],
True, RGBColor[1, 1, 1]
];
ListPlot3D[Data, PlotRange -> All, ColorFunction -> MyColorData,
Mesh -> None];
2010/9/23 Szymon Roziewski <szymon.roziewski at gmail.com>
> Hi there,
> How can I get a contour (from the surface which is plotted by ListPlot3D)
> plot under ListPlot3D? and place it on one graph?
>
>
>
> Best regards,
> Szymon Roziewski
>
>
>
--
Best regards,
Szymon Roziewskii