Fichier:Maxwell-coil-field-3D.png
Taille de cet aperçu : 795 × 599 pixels. Autres résolutions : 319 × 240 pixels | 637 × 480 pixels | 1 019 × 768 pixels | 1 280 × 965 pixels | 2 600 × 1 960 pixels.
Fichier d’origine (2 600 × 1 960 pixels, taille du fichier : 652 kio, type MIME : image/png)
Ce fichier et sa description proviennent de Wikimedia Commons.
Description
| Description |
English: 3D plot of the absolute value of the magnetic field B of a Maxwell coil consisting of three thin circular coils arranged to create a maximally uniform field in the center. The inner central coil has radius R and current I. The two outer coils have radii , axial distance and carry the current 49/64I. The central coil radius R is set to 1. The B-field is given in units of the central field . |
| Date | |
| Source |
Travail personnel  Ce diagramme a été créé avec Mathematica |
| Auteur | Geek3 |
Mathematica Source Code
Bx[x_, z_, R_] =
If[Abs[x/R] < 10^-5, 0, z/(2 Pi x) (\[Beta] = (x + R)^2 + z^2;
m = 4 x*R/\[Beta];
1/Sqrt[\[Beta]] ((R^2 + x^2 + z^2)/((R - x)^2 + z^2) EllipticE[
m] - EllipticK[m]))];
Bz[x_, z_, R_] = 1/(2 Pi) (\[Beta] = (x + R)^2 + z^2;
m = 4 x*R/\[Beta];
1/Sqrt[\[Beta]] ((R^2 - x^2 - z^2)/((R - x)^2 + z^2) EllipticE[
m] + EllipticK[m]));
B[x_, z_, R_] = {Bx[x, z, R], Bz[x, z, R]};
ColorFunc[x_] =
Blend[{{0, Hue[0.65, 0.6, 1]}, {1/4, Hue[1/3, 0.7, 0.8]}, {1/2,
Hue[1/6, 0.9, 0.8]}, {1, RGBColor[0.95, 0.2, 0.2]}}, x];
R = 1;
plot = Plot3D[
R*16/15 Norm[
B[x, z, R] + 49/64 B[x, z - R*Sqrt[3/7], R Sqrt[4/7]] +
49/64 B[x, z + R*Sqrt[3/7], R Sqrt[4/7]]],
{x, -2, 2}, {z, -2, 2}, PlotRange -> {0, 2},
BoxRatios -> {4, 4, 2},
AxesLabel -> {"\[Rho]", "z", "\!\(\*FractionBox[\"B\",
RowBox[{\"B\",
RowBox[{\"(\", \"0\", \")\"}]}]]\)"},
AxesEdge -> {{-1, -1}, {1, -1}, {1, 1}}, PlotPoints -> 301,
MaxRecursion -> 2, Method -> {Refinement -> {ControlValue -> 0.05}},
ImageSize -> 800, ClippingStyle -> None,
Mesh -> {7, 9, Range[0, 3/2, 1/2]},
MeshFunctions -> {#1 &, #2 &, #3 &},
MeshStyle -> {Black, Black, {LightGray, Thickness[0.002]}},
ColorFunction -> (Directive[SurfaceColor@Darker[ColorFunc[#3], 0.2],
Glow@Darker[ColorFunc[#3], 0.8], Specularity[0.3, 40]] &),
BaseStyle -> {FontSize -> 20}, ViewPoint -> {4, -10, 6}]
SetDirectory[NotebookDirectory[]];
Export["Maxwell-coil-field-3D.png", plot, ImageResolution -> 300];
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 cet élément, vous devez distribuer votre contribution sous une [[ccorg:share-your-work/licensing-considerations/compatible-licenses
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 | 20 février 2018 à 00:02 | | 2 600 × 1 960 (652 kio) | Geek3 | User created page with UploadWizard |
Utilisation du fichier
La page suivante utilise ce fichier :
Usage global du fichier
Les autres wikis suivants utilisent ce fichier :
- Utilisation sur en.wiki.x.io
- Utilisation sur hi.wiki.x.io
- Utilisation sur pl.wiki.x.io
