Les lecteurs de Vikidia demandent des articles en plus. Voyez la liste d'articles à créer, et venez nous aider à les rédiger !
Fichier:Dipole-potential-3D-streamlines-charges.png
Aller à la navigation
Aller à la recherche
Taille de cet aperçu : 800 × 572 pixels. Autres résolutions : 320 × 229 pixels | 640 × 458 pixels | 1 024 × 733 pixels | 1 280 × 916 pixels | 1 500 × 1 073 pixels.
Fichier d’origine (1 500 × 1 073 pixels, taille du fichier : 476 kio, type MIME : image/png)
Description
| Description |
English: Dipole potential 3D with streams and charges |
| Date | |
| Source | Travail personnel |
| Auteur | MikeRun |
| Autres versions |
older version with different colors  |
| PNG information | |
| Code source | Mathematica codenorm[a_]:=Sqrt[a.a];
ePot[ {x_,y_}, {px_,py_,q_} ]:=q/norm[ {x,y} - {px,py} ];
Dipole[ x_, y_ ]:=-ePot[ {x,y}, {-1,-1,1} ] + ePot[ {x,y}, {1,1,1}];
pPoints=150;
imgSize=1500;
xmin=-3;xmax=3;
ymin=-3;ymax=3;
exp=0.75;
obj=Plot3D[
Dipole[x,y],
{x,xmin,xmax},
{y,ymin,ymax},
Mesh->None,
ImageSize->imgSize,
PlotPoints->pPoints,
PlotStyle->{Texture[Lighter[Show[DensityPlot[Dipole[x,y],{x,xmin,xmax},{y,ymin,ymax},ColorFunction->Function[z,If[z<0.5,Blend[{RGBColor[0.176,0.306,933],RGBColor[1,1,1]},(2*z)^exp],Blend[{RGBColor[1,1,1],RGBColor[0.82,0.133,0.165]},(2*(z-0.5))^exp]]],PlotPoints->pPoints],StreamPlot[Evaluate[-D[Dipole[x,y],[[:Template:X,y]]]],{x,xmin,xmax},{y,ymin,ymax},Frame->None,ImageSize->imgSize,StreamStyle->Black,PerformanceGoal->"Quality",PlotTheme->"ThickLines"],Frame->None,PlotRangePadding->0,ImageSize->imgSize],0]]},
Lighting->"Neutral",
Boxed-> False,
Axes->False,
PlotTheme->"FilledSurface",
Background->RGBColor[0.95,0.95,0.95]
];
Export["./dipole-potential-3D-streamlines.png",obj]
|
Conditions d’utilisation
Moi, en tant que détenteur des droits d’auteur sur cette œuvre, je la publie sous la licence suivante :
Ce fichier est sous la licence Creative Commons Attribution – Partage dans les Mêmes Conditions 4.0 International.
- Vous êtes libre :
- de partager – de copier, distribuer et transmettre cette œuvre
- d’adapter – de modifier cette œuvre
- Sous les conditions suivantes :
- paternité – Vous devez donner les informations appropriées concernant l'auteur, fournir un lien vers la licence et indiquer si des modifications ont été faites. Vous pouvez faire cela par tout moyen raisonnable, mais en aucune façon suggérant que l’auteur vous soutient ou approuve l’utilisation que vous en faites.
- partage à l’identique – Si vous modifiez, transformez, ou vous basez sur cette œuvre, vous devez distribuer votre contribution sous la même licence ou une licence compatible avec celle de l’original.
Historique du fichier
Cliquer sur une date et heure pour voir le fichier tel qu'il était à ce moment-là.
| Date et heure | Vignette | Dimensions | Utilisateur | Commentaire | |
|---|---|---|---|---|---|
| Actuel | 26 mars 2020 à 13:30 | | 1 500 × 1 073 (476 kio) | wikimediacommons>MikeRun | Uploaded own work with UploadWizard |
Utilisation du fichier
La page suivante utilise ce fichier :
