In[]:=
meas={{7.9±0.4,(4.6±2.3)×},{8.6±0.4,(4.0±2.0)×},{11.4±0.6,(5.1±2.6)×},{12.3±0.6,(4.4±2.2)×},{17.5±0.9,(4.6±2.3)×},{18.6±0.9,(4.7±2.3)×},{25.8±1.3,(5.8±2.9)×},{27.5±1.4,(4.5±2.2)×},{37.4±1.9,(4.6±2.3)×},{50.1±2.5,(4.1±2.0)×},{62.7±3.1,(4.3±2.2)×},{78.±4.,(1.4±0.7)×},{101.±5.,(1.3±0.7)×},{123.±6.,(1.8±0.9)×},{157.±8.,(2.2±1.1)×},{157.±8.,(2.2±1.1)×},{189.±9.,(1.1±0.5)×},{217.±11.,(9.±5.)×},{237.±12.,(9.±5.)×}};mwePlot=ListLogLogPlot[meas,GridLinesAutomatic,GridLinesStyleBlack,FrameStyleBlack,FrameTrue,FrameLabel{"PAS Detuning [GHz]","/I []","",""},BaseStyle{FontSize14},PlotLegends{"Sr, exp. "},PlotRange{{3,500},{,}},PlotStyle{GrayLevel[0.5],PointSize[Large]},ImageSizeLarge]
-13
10
-13
10
-13
10
-13
10
-13
10
-13
10
-13
10
-13
10
-13
10
-13
10
-13
10
-13
10
-13
10
-13
10
-13
10
-13
10
-13
10
-14
10
-14
10
K
ν
5
cm
-1
mW
-1
s
86
-16
10
-11
10
Out[]=
In[]:=
In[]:=
In[]:=
In[]:=
In[]:=
(*86SrEnd--------------------------------------------------------------------------------------------------------------*)