Fișier:Asymmetricwave2.png
Sari la navigare
Sari la căutare
Mărimea acestei previzualizări: 800 × 599 pixeli. Alte rezoluții: 320 × 240 pixeli | 640 × 479 pixeli | 1.024 × 767 pixeli | 1.280 × 958 pixeli | 1.814 × 1.358 pixeli.
Fișier original (1.814 × 1.358 pixeli, mărime fișier: 505 KB, tip MIME: image/png)
Descriere fișier
| Descriere |
English: Asymmetric wavefunction for a (fermionic) 2-particle state in a one-dimensional square well potential of infinite depth. The 3D graph shows the wavefunction for the 2-particle fermionic first excited state for the square well, with each horizontal axis giving one particle's position. |
| Sursă |
Own work using:
|
| Autor | TimothyRias |
Licențiere
Eu, deținătorul drepturilor de autor ale acestei opere, prin prezenta îmi public lucrarea sub următoarea licență:
Acest fișier a fost eliberat sub licența Creative Commons Atribuire 3.0 Neadaptată.
- Sunteți liber:
- să partajați cu alții – aveți dreptul de a copia, distribui și transmite opera
- să adaptați – aveți dreptul de a adapta opera
- În următoarele condiții:
- atribuind – Trebuie să atribuiți opera corespunzător, introducând o legătură către licență și indicând dacă ați făcut schimbări. Puteți face asta prin orice metodă rezonabilă, dar nu într-un fel care ar sugera faptul că persoana ce a licențiat conținutul v-ar susține sau ar aproba folosirea de către dumneavoastră a operei sale.
Code
&Assumptions = {n \[Element] Integers, m \[Element] Integers};
f[n_, x_] := Sqrt[2] Sin[n \[Pi] x]
a[n_, m_] := Function[{x, y}, (f[n, x] f[m, y] - f[n, y] f[m, x])/Sqrt[2]];
awave2 = Plot3D[Evaluate[a[1, 3][x, y]], {x, 0, 1}, {y, 0, 1},
PlotPoints -> 35,
PlotRange -> {-2.5, 3.5},
MeshFunctions -> {#3 &},
Mesh -> 10,
MeshStyle ->
Directive[ColorData["DeepSeaColors"][.1], Thickness[.002]],
ColorFunction -> "LakeColors",
BoxRatios -> {1, 1, .7},
Boxed -> False,
Axes -> False];
agroundplot = Plot3D[-3, {x, 0, 1}, {y, 0, 1},
MeshFunctions -> {a[1, 3][#1, #2] &},
Mesh -> 10,
MeshStyle ->
Directive[ColorData["DeepSeaColors"][.1], Thickness[.002]],
PlotPoints -> 50,
ColorFunction -> (ColorData["LakeColors"][(a[1, 3][#1, #2] + 2.5)/
6] &)
];
awave3 = Show[{awave2, agroundplot},
PlotRange -> {{0, 1}, {0, 1}, {-3, 3}},
Axes -> None,
PlotRangePadding -> None,
ImagePadding -> 1,
FaceGrids -> {
{{-1, 0, 0}, {Table[i, {i, 0, 1, 1/9}],
Table[i, {i, -3, 3, 1}]}},
{{0, -1, 0}, {Table[i, {i, 0, 1, 1/9}], Table[i, {i, -3, 3, 1}]}}
},
ViewPoint -> 1000 {5, 5, 2},
ViewVertical -> {0, 0, 1},
ViewCenter -> {.5, .5, 0},
ImageSize -> 600]
Export["Asymmetricwave2.png", awave3, "PNG"]
Istoricul fișierului
Apăsați pe Data și ora pentru a vedea versiunea fișierului trimisă la momentul respectiv.
| Data și ora | Miniatură | Dimensiuni | Utilizator | Comentariu | |
|---|---|---|---|---|---|
| actuală | 4 aprilie 2023 15:58 | | 1.814x1.358 (505 KB) | wikimediacommons>Jähmefyysikko | Higher resolution image |
Utilizarea fișierului
Următoarea pagină folosește acest fișier:
