파일:Drexhage experiment.gif

문서 내용이 다른 언어로는 지원되지 않습니다.
위키백과, 우리 모두의 백과사전.

Drexhage_experiment.gif(576 × 245 픽셀, 파일 크기: 1.42 MB, MIME 종류: image/gif, 반복됨, 61 프레임)

파일 설명

설명
English: Schematic of the Drexhage experiment. Both the emission pattern and the total power emitted by a dipole depend on the distance from a mirror. This can be interpreted as an effect of the modified local density of stste.
Italiano: Rappresentazione schematica dell'esperimento di Drexhage. Quando un dipolo si trova vicino a uno specchio la radiazione riflessa interferisce con quella emessa modificando sia la distribuzione angolare che la potenza totale emessa. Questo effetto ha un'interpretazione naturale in termini di densità degli stati vicino allo specchio.
날짜
출처 https://twitter.com/j_bertolotti/status/1150745727011905536
저자 Jacopo Bertolotti
저작권
(이 파일을 인용하기)
https://twitter.com/j_bertolotti/status/1030470604418428929

Mathematica 11.0 code

\[Lambda] = 1;
k0 = (2 \[Pi])/\[Lambda];
G[r_] := I/4 HankelH1[0, k0 Norm[r] ];
s = Table[{h,(Abs[NIntegrate[G[{Cos[\[Theta]], Sin[\[Theta]]}] - G[{Cos[\[Theta]], Sin[\[Theta]]} - {2*h, 0}], {\[Theta], 0, 2 \[Pi]}] ]/s0)^2}, {h, 3, 0, -0.01}];
p1 = Table[
   GraphicsRow[{
DensityPlot[Abs[G[{x, y}] - G[{x + 2*h, y}] ]^2, {x, -3, 7}, {y, -5, 5}, PlotPoints -> 100, Frame -> False, ColorFunction -> "AvocadoColors", PlotLabel -> "|E\!\(\*SuperscriptBox[\(|\), \(2\)]\)", 
      PlotRange -> {0, 0.02}, LabelStyle -> {Black, Bold}, Epilog -> {Gray, Polygon[{{-5, -5}, {-h, -5}, {-h, 5}, {-5, 5}}]}]
     ,
     ListPlot[s, PlotRange -> {0, 2}, Joined -> True, Axes -> False, Frame -> True, LabelStyle -> {Black, Bold}, PlotStyle -> {Black, Thick}, FrameLabel -> {"Distance from the mirror / \[Lambda]", 
        "P/\!\(\*SubscriptBox[\(P\), \(\[Infinity]\)]\)"}, Epilog -> {PointSize[0.03], Red, Point[{h, Evaluate[(1/s0 Abs[NIntegrate[G[{Cos[\[Theta]], Sin[\[Theta]]}] - G[{Cos[\[Theta]], Sin[\[Theta]]} - {2*h, 0}], {\[Theta], 0, 2 \[Pi]}] ])^2]}]}]
     }, ImageSize -> Large]
   , {h, 3, 0, -0.05}];
ListAnimate[p1]

라이선스

나는 아래 작품의 저작권자로서, 이 저작물을 다음과 같은 라이선스로 배포합니다:
Creative Commons CC-Zero 이 파일은 크리에이티브 커먼즈 CC0 1.0 보편적 퍼블릭 도메인 귀속에 따라 이용할 수 있습니다.
저작물에 본 권리증서를 첨부한 자는 법률에서 허용하는 범위 내에서 저작인접권 및 관련된 모든 권리들을 포함하여 저작권법에 따라 전 세계적으로 해당 저작물에 대해 자신이 갖는 일체의 권리를 포기함으로써 저작물을 퍼블릭 도메인으로 양도하였습니다. 저작권자의 허락을 구하지 않아도 이 저작물을 상업적인 목적을 포함하여 모든 목적으로 복제, 수정·변경, 배포, 공연·실연할 수 있습니다.

설명

이 파일이 나타내는 바에 대한 한 줄 설명을 추가합니다
Dipole next to a mirror changes both the radiation pattern and the total power emitted

파일 역사

날짜/시간 링크를 클릭하면 해당 시간의 파일을 볼 수 있습니다.

날짜/시간섬네일크기사용자설명
현재2019년 7월 16일 (화) 17:312019년 7월 16일 (화) 17:31 판의 섬네일576 × 245 (1.42 MB)BertoUser created page with UploadWizard

다음 문서 1개가 이 파일을 사용하고 있습니다:

이 파일을 사용하고 있는 모든 위키의 문서 목록

다음 위키에서 이 파일을 사용하고 있습니다:

메타데이터