Fitxer:Wignerfunction catstate even 2.0.png
El contingut de la pàgina no s'admet en altres llengües.
Aparença
De la Viquipèdia, l'enciclopèdia lliure
![Fitxer:Wignerfunction catstate even 2.0.png](http://upload.wikimedia.org/wikipedia/commons/thumb/2/2b/Wignerfunction_catstate_even_2.0.png/800px-Wignerfunction_catstate_even_2.0.png)
Mida d'aquesta previsualització: 800 × 410 píxels. Altres resolucions: 320 × 164 píxels | 640 × 328 píxels | 1.024 × 525 píxels | 1.280 × 657 píxels | 2.000 × 1.026 píxels.
Fitxer original (2.000 × 1.026 píxels, mida del fitxer: 687 Ko, tipus MIME: image/png)
![]() | Aquest fitxer i la informació mostrada a continuació provenen del dipòsit multimèdia lliure Wikimedia Commons.![]() |
Resum
DescripcióWignerfunction catstate even 2.0.png |
English: Wigner function of an even cat state with amplitude α=2.0. |
Data | |
Font |
Treball propi![]() Aquesta PNG imatge rasteritzada ha estat creada amb Mathematica |
Autor | Geek3 |
Source code
cat[\[Alpha]_, \[Theta]_, q_, p_] :=
1/(2 Pi)*1/(1 + Cos[\[Theta]]*Exp[-2 \[Alpha]^2])*(
Exp[-p^2 - (q + Sqrt[2] \[Alpha])^2] +
Exp[-p^2 - (q - Sqrt[2] \[Alpha])^2] +
2 Cos[\[Theta] - 2 Sqrt[2] \[Alpha]*p]*Exp[-q^2 - p^2]);
rq = 6; rp = 3; t = 0.003; FontS = 20;
For[\[Theta] = 0, \[Theta] <= Pi, \[Theta] += Pi,
For[\[Alpha] = 1/2, \[Alpha] < 3, \[Alpha] += 1/2,
plot = Show[Plot3D[cat[\[Alpha], \[Theta], q, p],
{q, -rq, rq}, {p, -rp, rp}, ImageSize -> 800,
Mesh -> {Range[-Floor[rq], Floor[rq] ],
Range[-Floor[rp], Floor[rp] ], Range[-1, 1, 1/4]/Pi},
MeshFunctions -> {#1 &, #2 &, #3 &},
MeshStyle -> {Directive[Black, Thickness[t] ],
Directive[Black, Thickness[t] ],
Directive[White, Thickness[t] ]},
PlotRange -> {-1/Pi, 1/Pi}, PlotPoints -> 81, MaxRecursion -> 4,
Method -> {Refinement -> {ControlValue -> 0.02} },
PlotStyle -> Opacity[0.85], Lighting -> "Classic",
ColorFunction -> ({RGBColor[1, 1, 0.75], Glow[GrayLevel[0.06] ],
Specularity[0.5, 60]} &),
Axes -> False, Boxed -> False,
ViewPoint ->
FromSphericalCoordinates[{Sqrt[229/20], Pi/3, -0.64 Pi}] ],
Graphics3D[{Thickness -> t, Black,
Line[{ {-rq, rp, 0}, {-rq, -rp, 0}, {rq, -rp, 0} }]}],
Graphics3D[{Thickness -> t, Black,
Line[{ {-rq, rp, -1/Pi}, {-rq, rp, 1/Pi} }]}],
(* q ticks *)
Sequence @@
Table[Graphics3D[{Thickness -> t, Black,
Line[{ {x, -rp, 0}, {x, -0.2 - rp, 0} }]}], {x, -Floor[rq],
Floor[rq]}],
(* p ticks *)
Sequence @@
Table[Graphics3D[{Thickness -> t, Black,
Line[{ {-rq, y, 0}, {-rq - 0.2, y, 0} }]}], {y, -Floor[rp],
Floor[rp]}],
(*W ticks *)
Sequence @@
Table[Graphics3D[{Thickness -> t, Black,
Line[{ {-rq, rp, z/(2 Pi)}, {-rq - 0.2, rp,
z/(2 Pi)} }]}], {z, -2, 2}],
(* axes labels *)
Graphics3D[Text[Style["q", FontS, Black], {0, -rp*1.11, -0.07}] ],
Graphics3D[Text[Style["p", FontS, Black], {-rq*1.11, 0, -0.07}] ],
Graphics3D[
Text[Style["W", FontS, Black], {-rq*0.93, rp*0.93, 0.8/Pi}] ],
Sequence @@
Table[Graphics3D[{Text[
Style[TextString[x], FontS,
Black], {x, -rp - 0.07 Max[rq, rp], -0.003}, {0,
1}]}], {x, -Floor[rq], Floor[rq]}],
Sequence @@
Table[Graphics3D[{Text[
Style[TextString[y], FontS, Black], {-rq - 0.07 Max[rq, rp],
y, -0.003}, {0, 1}]}], {y, -Floor[rp], Floor[rp]}],
Sequence @@
Table[Graphics3D[{Text[
Style[If[z == 0, "0", ToString[z/(2 Pi), TraditionalForm] ],
FontS, Black], {-rq - 0.3, rp, z/2/Pi}, {1, 0}]}], {z, -2,
2}],
BoxRatios -> {Automatic, Automatic, 8}, PlotRange -> All
];
trim = { {0., .26}, {.97, .86} };
imgname =
"Wignerfunction_catstate_" <> If[\[Theta] == 0, "even_", "odd_"] <>
TextString[\[Alpha]] <> ".png";
Export[imgname,
ImageResize[
ImageTrim[Image[plot, ImageResolution -> 400], trim,
DataRange -> { {0, 1}, {0, 1} }], 2000, Resampling -> "Linear"] ];
] ]
Llicència
Jo, el titular dels drets d'autor d'aquest treball, el public sota la següent llicència:
![w:ca:Creative Commons](https://upload.wikimedia.org/wikipedia/commons/thumb/7/79/CC_some_rights_reserved.svg/90px-CC_some_rights_reserved.svg.png)
![reconeixement](https://upload.wikimedia.org/wikipedia/commons/thumb/1/11/Cc-by_new_white.svg/24px-Cc-by_new_white.svg.png)
![compartir igual](https://upload.wikimedia.org/wikipedia/commons/thumb/d/df/Cc-sa_white.svg/24px-Cc-sa_white.svg.png)
This file is licensed under the Creative Commons Attribution-Share Alike 4.0 International license.
- Sou lliure de:
- compartir – copiar, distribuir i comunicar públicament l'obra
- adaptar – fer-ne obres derivades
- Amb les condicions següents:
- reconeixement – Heu de donar la informació adequada sobre l'autor, proporcionar un enllaç a la llicència i indicar si s'han realitzat canvis. Podeu fer-ho amb qualsevol mitjà raonable, però de cap manera no suggereixi que l'autor us dóna suport o aprova l'ús que en feu.
- compartir igual – Si modifiqueu, transformeu, o generareu amb el material, haureu de distribuir les vostres contribucions sota una llicència similar o una de compatible com l'original
Llegendes
Afegeix una explicació d'una línia del que representa aquest fitxer
Elements representats en aquest fitxer
representa l'entitat
Algun valor sense element de Wikidata
20 maig 2019
image/png
Historial del fitxer
Cliqueu una data/hora per veure el fitxer tal com era aleshores.
Data/hora | Miniatura | Dimensions | Usuari/a | Comentari | |
---|---|---|---|---|---|
actual | 18:45, 20 maig 2019 | ![]() | 2.000 × 1.026 (687 Ko) | Geek3 | User created page with UploadWizard |
Ús del fitxer
La pàgina següent utilitza aquest fitxer:
Ús global del fitxer
Utilització d'aquest fitxer en altres wikis:
- Utilització a en.wikipedia.org
- Utilització a fr.wikipedia.org
Metadades
Aquest fitxer conté informació addicional, probablement afegida per la càmera digital o l'escàner utilitzat per a crear-lo o digitalitzar-lo. Si s'ha modificat posteriorment, alguns detalls poden no reflectir les dades reals del fitxer modificat.
Resolució horitzontal | 157,48 ppc |
---|---|
Resolució vertical | 157,48 ppc |
Programari utilitzat |
|
Dia i hora de digitalització |
|