Fitxer:2D Wavefunction (1,2) Surface Plot.png

De Viquipèdia
Jump to navigation Jump to search

Fitxer original(1.575 × 1.181 píxels, mida del fitxer: 490 Ko, tipus MIME: image/png)

Descripció

The quantum wavefunction of a particle in a 2D box of dimensions Lx and Ly. The wavenumbers are:

  • nx=1
  • ny=2
Data
Font Own drawing, plotted in MuPAD.
Autor Inductiveload
Permís
(Com reutilitzar aquest fitxer)
Public domain Jo, el titular del copyright d'aquesta obra, la allibero al domini públic. Això s'aplica a tot el món.
En alguns països això pot no ser legalment possible, en tal cas:
Jo faig concessió a tothom del dret d'usar aquesta obra per a qualsevol propòsit, sense cap condició llevat d'aquelles requerides per la llei.

Altres versions

See 2D Quantum Wavefunctions for more plots.

Mathematica Code

This code does not require any packages to be loaded.

nx = 1
ny = 2
Plot3D[
  Sin[nx Pi x]Sin[ny Pi y],
  {x, 0, 1}, 
  {y, 0, 1},
  ImageSize -> 2500,
  BoxRatios -> {2, 2, 2},
  AxesLabel -> {x/Subscript[L, x], y/Subscript[L, y], Subscript[ψ, "1,1"]},
  PlotRange -> {-1, 1},
  TextStyle -> {FontSize -> 96}
  ]

MuPAD Code

nx := 1:
ny := 2: 
f := sin(nx*x*PI) * sin(ny*y*PI):

  conts := 16:
  projectionlevel:=-1.5:

colourfunc := zip(RGB::Red, RGB::Yellow,
                  (a, b) -> (f(x,y)+1)/(2)*a
                           -(f(x,y)-1)/(2)*b):

funcplot := plot::Function3d(f(x,y),
                             x = 0..1,
                             y = 0..1,
                             Mesh = [24, 24],
                             Submesh=[8,8],
                             LineColor = RGB::Black.[0.99],
                             LineWidth = 0.2,
                             FillColorFunction = colourfunc,                             
                             AxesTitleFont = ["BKM-cmr17", 20],
                             TicksLabelFont = ["Courier New", 12],                         
                             ViewingBoxZRange = -1.5..1
                            ):

contours := plot::modify(funcplot,
                         ZContours = [Automatic, conts],
                         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 = [Automatic, conts],
                                                LineWidth = 0.2,
                                                LineColorType = Dichromatic,
                                                LineColor = RGB::Red.[0.99],
                                                LineColor2 = RGB::Yellow.[0.99],
                                                XLinesVisible = FALSE,
                                                YLinesVisible = FALSE,
                                                Filled = FALSE
                                               )
                                  ):
                             
camera := plot::Camera([17, -24, 45],
                       [0.5, 0.4, -0.2],
                       0.038
                      ):
                             
ploteverything := plot::Canvas(funcplot, contours, projcontours,
                               Width = 200*unit::mm, 
                               Height = 150*unit::mm,
                               AxesTitles = ["x/L(x)", "y/L(y)", "z"],                                                              
                               camera
                              ): 
                          
plot(ploteverything)

Historial del fitxer

Cliqueu una data/hora per veure el fitxer tal com era aleshores.

Data/horaMiniaturaDimensionsUsuariComentari
actual23:08, 4 ago 2007Miniatura per a la versió del 23:08, 4 ago 20071.575 × 1.181 (490 Ko)Inductiveload
20:32, 4 ago 2007Miniatura per a la versió del 20:32, 4 ago 20071.575 × 1.181 (504 Ko)Inductiveload
02:58, 19 feb 2007Miniatura per a la versió del 02:58, 19 feb 20071.575 × 1.181 (505 Ko)InductiveloadmuPAd plot
05:41, 13 feb 2007Miniatura per a la versió del 05:41, 13 feb 20072.499 × 2.713 (134 Ko)Inductiveload{{Information |Description=The quantum wavefunction of a particle in a 2D box of dimensions L<sub>x</sub> and L<sub>y</sub>. The wavenumbers are: *''n<sub>x</sub>''=1 *''n<sub>y</sub>''=2 |Source=Own drawing, plotted in Mathematica. |Date=13/02/2007 |Au

La pàgina següent utilitza aquest fitxer:

Ús global del fitxer

Utilització d'aquest fitxer en altres wikis:

Metadades