Post on 29-Apr-2018
A continuacion observaras la forma del termino
monopolar del potencial electrico visto desde 2
dimensiones.
Clear@φD;
Clear@xD;
Clear@yD;
ε0 = 8.854 ∗ 10−12
;
qe = 1.602 ∗ 10−19
;
Q = qe;
φ@x_, y_, z_D =
1
4 π ∗ ε0
Q
x2+ y2
+ z2
;
z = 0;
graf1 = ContourPlot@φ@x, y, zD, 8x, −1, 1<, 8y, −1, 1<,
PlotPoints → 40, Contours → 10, Axes → True, AxesLabel → 8X, Y<DClear@
zD;
-1.0 -0.5 0.0 0.5 1.0
-1.0
-0.5
0.0
0.5
1.0
X
Y
A continuacion observara la forma del campo electrico
debido al termino monopolar visto desde 2
dimensiones.
z = 0;
graf2 = StreamPlotAEvaluateA9−∂x φ@x, y, zD, −∂y φ@x, y, zD=E,
8x, −2, 2<, 8y, −2, 2<, Axes → True, AxesLabel → 8X, Y<EClear@
zD;
-2 -1 0 1 2
-2
-1
0
1
2
X
Y
A continuacion observara la forma del termino monopo-
lar del potencial y el campo electrico visto desde 2
dimensiones.
2 Monopolo.nb
Show@graf1, graf2D
-1.0 -0.5 0.0 0.5 1.0
-1.0
-0.5
0.0
0.5
1.0
X
Y
A continuacion observara la forma del campo electrico
debido al termino monopolar del potencial electrico
visto desde 3 dimensiones.
Clear@"x∗", "y∗", "z∗"D;
Needs@"VectorAnalysis`"D
Monopolo.nb 3