mathematic模拟出只有个坐标轴,怎么解决Clear["Global`*"]
qe = 1.602*10^-19
e = 2.72
ne = 2.13*10^21
\[Epsilon]0 = 8.85*10^-12
me = 9.109*10^-31
\[Mu]0 = 4*\[Pi]*10^-7
c = 3*10^8
Te = 5583
kB = 1.38*10^-23
Z = 0.1*10^-3
\[CapitalLambda] = (3*(\[Epsilon]0*kB*Te)^(3/2))/(
2*Sqrt[\[Pi]]*qe^3*Sqrt[ne])
vei = 4*Sqrt[(2*\[Pi])]*ne*Z^2*qe^4*Log[e, \[CapitalLambda]]
\[Omega]pe = Sqrt[(ne*qe^2)/(\[Epsilon]0*me)]
\[Omega] = (2*\[Pi]*c)/\[Lambda]
\[Omega]B = (qe*B0)/me
\[Lambda] = 10
kib = vei/c*\[Omega]pe^2/\[Omega]^2*1/(1 - \[Omega]B^2/\[Omega]^2)*1/ Sqrt[1 - \[Omega]pe^2/\[Omega]^2*1/(1 - \[Omega]B^2/\[Omega]^2)]
Plot[kib, {B0, 0, 100}, PlotRange -> {0, 0.8}]