level 3
轰天雷sss
楼主
\[CapitalXi] = \[CapitalXi]r + I \[CapitalXi]i;
\[CapitalLambda] = -0.2 I ;
H = ( {
{Sqrt[2] I (1 + \[CapitalLambda]) , -1, 0},
{-1, I \[CapitalXi], -1},
{0, -1, -Sqrt[2] I (1 + \[CapitalLambda])}
} );
Do[Print[\[CapitalXi]r, \[CapitalXi]i,
Eigenvalues[H]]; \[Lambda][\[CapitalXi]r, \[CapitalXi]i] =
Eigenvalues[H], {\[CapitalXi]r, -0.5, 0.5,
0.1}, {\[CapitalXi]i, -0.5, 0.5, 0.1}]
\[Lambda][0.1, 0.1]
代码见上，对\[Lambda][\[CapitalXi]r, \[CapitalXi]i]进行循环赋值时，自变量为{0.1,0.1}的位置也是可以看到本征值的，但是\[Lambda][0.1,0.1]却没有被赋值，很多点被成功赋值了，偶然发现一些点没有值，请知道的大佬解答一下，感激不尽
PS：如果有一系列四维坐标点的列表{{x1,x2,x3,x4},...},如何画图可以让{x1,x2,x3}表示三维图中的点，x4的大小表示点的颜色，有大佬知道的话可以顺便说一下，谢谢！
2022年10月18日 14点10分
1
\[CapitalLambda] = -0.2 I ;
H = ( {
{Sqrt[2] I (1 + \[CapitalLambda]) , -1, 0},
{-1, I \[CapitalXi], -1},
{0, -1, -Sqrt[2] I (1 + \[CapitalLambda])}
} );
Do[Print[\[CapitalXi]r, \[CapitalXi]i,
Eigenvalues[H]]; \[Lambda][\[CapitalXi]r, \[CapitalXi]i] =
Eigenvalues[H], {\[CapitalXi]r, -0.5, 0.5,
0.1}, {\[CapitalXi]i, -0.5, 0.5, 0.1}]
\[Lambda][0.1, 0.1]
代码见上，对\[Lambda][\[CapitalXi]r, \[CapitalXi]i]进行循环赋值时，自变量为{0.1,0.1}的位置也是可以看到本征值的，但是\[Lambda][0.1,0.1]却没有被赋值，很多点被成功赋值了，偶然发现一些点没有值，请知道的大佬解答一下，感激不尽
PS：如果有一系列四维坐标点的列表{{x1,x2,x3,x4},...},如何画图可以让{x1,x2,x3}表示三维图中的点，x4的大小表示点的颜色，有大佬知道的话可以顺便说一下，谢谢！
