정전기 전위

전하가 대립하는 두 점 사이의 정전기 전위에서 생성된 힘 벡터 필드를 살펴봅니다.

In[1]:=

ElectroStaticPotential[ql_, pl_, r_] := Sum[ ql[[i]]/Norm[r - pl[[i]]], {i, Length[ql]}]

In[2]:=

v = Simplify[ ElectroStaticPotential[{1, -1}, {{-1, -1, 0}, {1, 1, 0}}, {x, y, z}], {x, y, z} \[Element] Reals];

In[3]:=

field = -Grad[v, {x, y, z}];

In[4]:=

SliceVectorPlot3D[Clip[field], {x, -2, 2}, {y, -2, 2}, {z, -2, 2}, PlotTheme -> "Scientific", ImageSize -> 500]

Out[4]=

포텐셜의 등값면 주위의 장을 보면, 점 사이에 장이 더 강한 것으로 나타납니다.

In[5]:=

SliceVectorPlot3D[ Clip[field], {v == -0.5, v == 0.5}, {x, -2.5, 2.5}, {y, -2.5, 2.5}, {z, -2.5, 2.5}, PlotTheme -> "Scientific", ImageSize -> 500]

Out[5]=