Fichier:Exponential Function Argument.png

De testwiki
Aller à la navigation Aller à la recherche
Fichier d’origine (1 700 × 1 400 pixels, taille du fichier : 593 kio, type MIME : image/png)

Ce fichier provient de Wikimedia Commons et peut être utilisé par d'autres projets. Sa description sur sa page de description est affichée ci-dessous.

Description

Diagram of the argument of the exponential function in the complex plane. The plot is given by:

Date
Source Own drawing, Plotted in MuPAD, code given below.
Auteur Inductiveload
Autorisation
(Réutilisation de ce fichier)
Public domain Moi, propriétaire des droits d’auteur sur cette œuvre, la place dans le domaine public. Ceci s'applique dans le monde entier.
Dans certains pays, ceci peut ne pas être possible ; dans ce cas :
J’accorde à toute personne le droit d’utiliser cette œuvre dans n’importe quel but, sans aucune condition, sauf celles requises par la loi.
Autres versions See Exponential function for related graphics.

MuPAD Code

  q := arg(exp(x+I*y)):

  conts := 10:
  projectionlevel:=-5:
  ylimit := 2*PI:
  xlimit := 3:
  submeshlevel := 0:

colourfunc := zip(RGB::VenetianRed, RGB::DarkBlue,
                  (a, b) -> (q(x,y)+PI)/(6)*a
                           -(q(x,y)-PI)/(6)*b):

funcplot := plot::Function3d(q(x,y),
                             x = -xlimit..xlimit,
                             y = -ylimit..ylimit,
                             Mesh = [23, 23],
                             Submesh = [submeshlevel,submeshlevel],
                             LineColor = RGB::Black.[0.4],
                             LineWidth = 0.15,
                             AdaptiveMesh = 10,
                             FillColorFunction = colourfunc,
                             AxesTitleFont = ["Courier New", Bold, 14],
                             ViewingBoxZRange = -5..PI,
                             YTicksNumber = None,
                             YTicksAt = [-3*PI/2 = "-3 PI/2", -PI = "-PI", -PI/2 = "-PI/2", -2*PI = "-2 PI",
                                         0 = "0", 
                                         PI/2 = "PI/2", PI = "PI",  3*PI/2 = "3 PI/2", 2*PI = "2 PI"],
                             ZTicksNumber = None,
                             ZTicksAt = [-PI = "-PI", -PI/2 = "-PI/2",
                                         0 = "0", 
                                         PI/2 = "PI/2", PI = "PI"]
                            ):

contours := plot::modify(funcplot,
                         ZContours = [$ -3.14..3.14 step 0.7853],
                         LineWidth = 0.2,
                         LineColor = RGB::Gray90.[0.5],
                         XLinesVisible = FALSE,
                         YLinesVisible = FALSE,
                         Filled = FALSE
                        ):
                        
projcontours := plot::Transform3d([0, 0, projectionlevel],
                                  [1, 0, 0, 0, 1, 0, 0, 0, 0], 
                                   plot::modify(funcplot, ZContours = [$ -3.14..3.14 step 0.7853],
                                                LineWidth = 0.2,
                                                LineColorType = Dichromatic,
                                                LineColor = RGB::VenetianRed.[0.99],
                                                LineColor2 = RGB::DarkBlue.[0.99],
                                                XLinesVisible = FALSE,
                                                YLinesVisible = FALSE,
                                                Filled = FALSE
                                               )
                                  ):
                             
camera := plot::Camera([-40, -120, 60],
                       [-0.5, -1, -0.5],
                       0.1
                      ):
                             
ploteverything := plot::Canvas(funcplot, contours, projcontours,
                               Width = 8.5*unit::inch, 
                               Height = 7*unit::inch,
                               camera
                              ): 
                          
plot(ploteverything)

Légendes

Ajoutez en une ligne la description de ce que représente ce fichier

Éléments décrits dans ce fichier

dépeint

607 196 octet

1 400 pixel

1 700 pixel

image/png

130b950155125302ea4ffa1c97c3788daaa0f557

Historique du fichier

Cliquer sur une date et heure pour voir le fichier tel qu'il était à ce moment-là.

Date et heureVignetteDimensionsUtilisateurCommentaire
actuel25 avril 2007 à 20:54Vignette pour la version du 25 avril 2007 à 20:541 700 × 1 400 (593 kio)wikimediacommons>Inductiveload{{Information |Description=Diagram of the argument of the exponential function in the complex plane. The plot is given by: ::<math>z=\operatorname{arg} \left (\exp \left( \frac{1}{x + i y} \right)\right)</math> |Source=Own drawing, Plotted in MuPAD, code

La page suivante utilise ce fichier :