File:Surface of revolution illustration.png

From formulasearchengine
Jump to navigation Jump to search

Original file(693 × 885 pixels, file size: 130 KB, MIME type: image/png)

This file is from Wikimedia Commons and may be used by other projects. The description on its file description page there is shown below.

Summary

Description Illustration of a en:surface of revolution
Date (UTC)
Source
 
This diagram was created with MATLAB.

source code below
Author Oleg Alexandrov
Other versions Derivative works of this file:  Surface of revolution illustration violett.png
Public domain I, the copyright holder of this work, release this work into the public domain. This applies worldwide.
In some countries this may not be legally possible; if so:
I grant anyone the right to use this work for any purpose, without any conditions, unless such conditions are required by law.

Source code (MATLAB)

% illustration of a surface of revolution
function main()

   % the number of data points. More points means prettier picture.
   N = 300;

   a=-3; b = 4.3;

   % polar coordinates
   ZZ = linspace(a, b, N);
   TTheta = linspace(0, 2*pi, N);

   % mesh grid
   [Z, Theta] = meshgrid(ZZ, TTheta);

   % the curve we will revolve
   R = cos(Z)+2; 
   
   X = R.*cos(Theta); Y = R.*sin(Theta);

   figure(2); clf; hold on; axis equal; axis off;
  
% plot the surface
   H=surf(X, Y, Z); shading faceted;

   % pick a color
   mycolor=[184, 77, 66]/256; % pink brick
   mycolor=[184, 224, 98]/256; % light green
%   mycolor=[225, 168, 48]/256; % golden brown
%   mycolor=[0, 66, 17]/256; % dark green
%   mycolor=[225, 0, 84]/256; % pink

   % set some propeties
   set(H, 'FaceColor', mycolor, 'EdgeColor','none', 'FaceAlpha', 1);
   set(H, 'SpecularColorReflectance', 0.1, 'DiffuseStrength', 0.8);
   set(H, 'FaceLighting', 'phong', 'AmbientStrength', 0.3);
   set(H, 'SpecularExponent', 108);
   
% viewing angle
   view(0, 12);

% add in a source of light
   camlight (-50, 54); lighting phong;
   
   % save as png
  print('-dpng', '-r200', 'Surface_of_revolution_illustration.png');

Captions

Add a one-line explanation of what this file represents

Items portrayed in this file

depicts

5 September 2007

image/png

File history

Click on a date/time to view the file as it appeared at that time.

Date/TimeThumbnailDimensionsUserComment
current22:15, 8 September 2011Thumbnail for version as of 22:15, 8 September 2011693 × 885 (130 KB)wikimediacommons>QuibikSmoothed the edges and added transparency.

There are no pages that use this file.