File originale (file in formato SVG, dimensioni nominali 250 × 625 pixel, dimensione del file: 11 KB)
Logo di Commons
Logo di Commons
Questo file e la sua pagina di descrizione (discussione · modifica) si trovano su Wikimedia Commons (?)
Descrizione

The direction of the helix relative to the central axis represents the direction of the electric field of the circularly polarized light at each point in space. The blue and red lines are projections of the helix onto two planes at right angles.


There is an version which is identical to this original with the exception of phase indictors to make the phase relationship of its components clearer. Refer to Other Versions section below.
Data 12/02/07
Fonte

Own drawing down in Mathematica, edited in the open source program Inscape.

 
Questa grafica vettoriale non specificata secondo il W3C è stata creata con Inkscape .
Autore inductiveload
Licenza
(Riusare questo file)
Public ___domain Io, detentore del copyright su quest'opera, la rilascio nel pubblico dominio. Questa norma si applica in tutto il mondo.
In alcuni paesi questo potrebbe non essere legalmente possibile. In tal caso:
Garantisco a chiunque il diritto di utilizzare quest'opera per qualsiasi scopo, senza alcuna condizione, a meno che tali condizioni siano richieste dalla legge.
Altre versioni

Opere derivate da questo file:  Polarisation (Circular) With Phase Indicators.svg Linear polarisation

Elliptical polarisation

Mathematica Code

This figure requires the use of Arrow3D, which is not included in the StandardPackages (as of Feb 2007). This can be obtained from Wolfram Research at this ___location. The required packages are:

<< Graphics`
<< Arrow3D`Arrow3D`

The code is:


wavefunction = ParametricPlot3D[{Sin[4t], -Cos[4t], t}, {t, 0, 5}, 
BoxRatios -> {1, 1, 4}, ImageSize -> 400, Boxed -> False, Axes -> 
    False, PlotPoints -> 600, ViewPoint -> {2, 2, 2}, PlotRange -> All]

repsi = ParametricPlot3D[{Sin[4t], -1, t, RGBColor[1, 0, 0]}, {t, 0, 5}, 
    BoxRatios -> {4, 1, 1}, ImageSize -> 500,
     Boxed -> False, Axes -> False, PlotPoints -> 600, PlotRange -> All]

impsi = ParametricPlot3D[{-1, -Cos[4t], t, RGBColor[0, 0, 102/255]}, {t, 0, \
5}, BoxRatios -> {4, 1, 1}, ImageSize -> 500, Boxed -> False, Axes -> False, 
      PlotPoints -> 600, PlotRange -> All]

end = ParametricPlot3D[{Sin[t], -Cos[t], 0}, {t, 0, 
    2π}, BoxRatios -> {4, 1, 1}, ImageSize -> 500, Boxed -> False, 
    Axes -> False, PlotPoints -> 600, PlotRange -> All]

xaxis = Graphics3D[Arrow3D[{0, 0, -1}, {0, 
  0, 6}, HeadSize -> UniformSize[.5], HeadColor -> Black]]

uaxis = Graphics3D[Arrow3D[{0, -1, 0}, {0, 3, 0}, HeadSize -> 
    UniformSize[.5], HeadColor -> Black]]

vaxis = Graphics3D[Arrow3D[{-1, 0, 0}, {3, 0, 0}, HeadSize -> 
    UniformSize[.5], HeadColor -> Black]]

plane = Graphics3D[Polygon[{{1.2, 1.2, 0}, {1.2, -1.2,
   0}, {-1.2, -1.2, 0}, {-1.2, 1.2, 0}}]]

crate = WireFrame[Graphics3D[Cuboid[{1, 1, 0}, {-1, -1, 5}]]]

Show[wavefunction, xaxis, uaxis, vaxis, plane, repsi, impsi, end, crate]

Didascalie

Aggiungi una brevissima spiegazione di ciò che questo file rappresenta

Elementi ritratti in questo file

raffigura

Cronologia del file

Fare clic su un gruppo data/ora per vedere il file come si presentava nel momento indicato.

Data/OraMiniaturaDimensioniUtenteCommento
attuale08:38, 12 feb 2007Miniatura della versione delle 08:38, 12 feb 2007250 × 625 (11 KB)Inductiveload
05:01, 12 feb 2007Miniatura della versione delle 05:01, 12 feb 2007250 × 625 (373 KB)Inductiveload{{Information |Description= |Source=Own drawing down in Mathematica, edited in Inscape. |Date=12/02/07 |Author=inductiveload |Permission={PD-self} |other_versions=Linear polarisation [[:image:Polarisation (Elliptical)

Nessuna pagina utilizza questo file.

Utilizzo globale del file

Anche i seguenti wiki usano questo file:

Visualizza l'utilizzo globale di questo file.