【求助各位大佬】等倾干涉问题
mathematica吧
全部回复
仅看楼主
level 1
大婊哥🍄 楼主
Manipulate[
DensityPlot[
1 + Cos[(4 \[Pi]/(\[Lambda]*10^-9)*((d)*10^-3*(Sqrt[
m^2 - n^2*Sqrt[(x^2 + y^2)/(f^2 + x^2 + y^2)]])))], {x, -3,
3}, {y, -3, 3}, PlotPoints -> 200, PlotRange -> All,
ImageSize -> 1.05 {400, 400}, PerformanceGoal -> "Speed"],
Row[{Control@{{\[Lambda], 632.8, "波长\[Lambda](nm)"}, 450, 750,
Appearance -> "Labeled", ImageSize -> Small},
Control@{{d, 0.027, "空气膜厚度d(mm)"}, -0.2, 0.2,
Appearance -> "Labeled", ImageSize -> Small},
Control@{{f, 20, "透镜焦距"}, 10, 40, Appearance -> "Labeled",
ImageSize -> Small},
Control@{{m, 1, "介质2折射率"}, 1, 4, Appearance -> "Labeled",
ImageSize -> Small},
Control@{{n, 1, "介质1折射率"}, 1, 4, Appearance -> "Labeled",
ImageSize -> Small}}], ControlPlacement -> Top]
这个代码跑出来的图不对,但是不知道怎么改了
2024年04月16日 06点04分 1
level 1
大婊哥🍄 楼主
2024年04月16日 06点04分 2
level 1
大婊哥🍄 楼主
应该是内大外小的分布,现在是均匀分布了,请问这个要怎么改啊+
2024年04月16日 06点04分 3
level 3
[滑稽]我怎么感觉这么熟悉呢?
2024年04月16日 16点04分 4
吧务
level 15
那你为啥觉得它应该是内大外小的?你依据的资料是啥?如果你觉得这些用不着给,看这里的4楼:https://tieba.baidu.com/p/2964416898
2024年05月04日 03点05分 5
1