Hello,
I have a 3D plot in which a particular axis label (Omega_Real) has coincided with the scales of that particular axis. Thus it is not quite distinct. I need to separate them. Kindly advice me. My code is as below:
y=Range[1,10];
x=Range[1,10];
x=(-p11*(1/xi+I k)-p44*(1/xi+I k)*(I k-1/xi)+p66*(1/xi^2+k^2)+y*(q22*(1/xi+I k)-q33*(1/xi+I k)(I k-1/xi)-q44*(1/xi^2+k^2)-q55*(1/xi-I k)))/(p22+p33*(I k-1/xi)-p55*(1/xi^2+k^2));
x=x*10^-25;
Table[Re[x],{xi,1,10,0.5},{k,0.1,1,0.1}]//TableForm;
Plot3D[Re[x],{xi,0.1,5},{k,0.1,5},BoundaryStyle->Directive[Blue,Thickness[0.007]],AxesLabel->(Style[#,Black,Bold,14]&/@{"\[Xi]","K","\!\(\*SubscriptBox[\(\[CapitalOmega]\), \(r\)]\)"}),Mesh->{{0}},BoxRatios->{1,1,0.4},BoxStyle->Directive[Black,Thickness@0.008],TicksStyle->Directive[Bold,Black,14]]
rgds