(* Content-type: application/vnd.wolfram.mathematica *)

(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)

(* CreatedBy='Mathematica 10.4' *)

(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[       158,          7]
NotebookDataLength[     47841,       1004]
NotebookOptionsPosition[     46779,        961]
NotebookOutlinePosition[     47125,        976]
CellTagsIndexPosition[     47082,        973]
WindowFrame->Normal*)

(* Beginning of Notebook Content *)
Notebook[{

Cell[CellGroupData[{
Cell["Fit 80K DTOL", "Title",
 CellChangeTimes->{{3.7777948625770874`*^9, 3.7777948651121187`*^9}}],

Cell["DFB1 - Toluene - CPMG", "Title",
 CellChangeTimes->{{3.777728905599147*^9, 3.7777289105494013`*^9}}],

Cell["\<\
Take some traces of the CPMG file and fit them. We want to investigate how \
they depend on the stretched parameter x on the exponential decay\
\>", "Text",
 CellChangeTimes->{{3.777728915653734*^9, 3.777728959878654*^9}}],

Cell[CellGroupData[{

Cell["Define models", "Section",
 CellChangeTimes->{{3.777728963054901*^9, 3.7777289659574685`*^9}}],

Cell[CellGroupData[{

Cell[BoxData[{
 RowBox[{
  RowBox[{
   RowBox[{"biexponential", "[", 
    RowBox[{
     RowBox[{"t_", "?", "NumericQ"}], ",", 
     RowBox[{"A_", "?", "NumericQ"}], ",", 
     RowBox[{"T1_", "?", "NumericQ"}], ",", 
     RowBox[{"T2_", "?", "NumericQ"}]}], "]"}], " ", "=", " ", 
   RowBox[{"A", "*", 
    RowBox[{"(", 
     RowBox[{
      RowBox[{"E1", "*", 
       RowBox[{"Exp", "[", 
        RowBox[{"-", 
         SuperscriptBox[
          RowBox[{"(", 
           RowBox[{"t", "/", "T1"}], ")"}], "0.7"]}], "]"}]}], "+", 
      RowBox[{"E2", "*", 
       RowBox[{"Exp", "[", 
        RowBox[{"-", 
         RowBox[{"(", 
          RowBox[{"t", "/", "T2"}], ")"}]}], "]"}]}]}], ")"}]}]}], 
  ";"}], "\[IndentingNewLine]", 
 RowBox[{"E1", " ", "=", "0.9"}], "\[IndentingNewLine]", 
 RowBox[{"E2", " ", "=", " ", "0.1"}]}], "Input",
 CellChangeTimes->{{3.7777289669719687`*^9, 3.7777290098136497`*^9}, {
  3.7777290751975293`*^9, 3.777729130293673*^9}, {3.7777299424762173`*^9, 
  3.777729963604664*^9}, {3.7777307705822306`*^9, 3.777730806446238*^9}, {
  3.7777948065074935`*^9, 3.777794811670342*^9}, {3.777795824519073*^9, 
  3.777795827435354*^9}, {3.7778131922947245`*^9, 3.777813210598467*^9}, {
  3.7778157818533*^9, 3.7778157963249755`*^9}, {3.7815039929918833`*^9, 
  3.7815039937106466`*^9}}],

Cell[BoxData["0.9`"], "Output",
 CellChangeTimes->{
  3.7777308079261956`*^9, 3.7777851931632166`*^9, 3.7777853151499925`*^9, 
   3.777794762148742*^9, 3.7777948119825087`*^9, 3.7777957628199787`*^9, {
   3.777795828122498*^9, 3.7777958390143576`*^9}, 3.7778131012878513`*^9, {
   3.7778131940326223`*^9, 3.7778132109108963`*^9}, 3.7778157407336507`*^9, {
   3.7778157788302374`*^9, 3.777815796746749*^9}, 3.7815040470603275`*^9}],

Cell[BoxData["0.1`"], "Output",
 CellChangeTimes->{
  3.7777308079261956`*^9, 3.7777851931632166`*^9, 3.7777853151499925`*^9, 
   3.777794762148742*^9, 3.7777948119825087`*^9, 3.7777957628199787`*^9, {
   3.777795828122498*^9, 3.7777958390143576`*^9}, 3.7778131012878513`*^9, {
   3.7778131940326223`*^9, 3.7778132109108963`*^9}, 3.7778157407336507`*^9, {
   3.7778157788302374`*^9, 3.777815796746749*^9}, 3.7815040470603275`*^9}]
}, Open  ]]
}, Open  ]],

Cell[CellGroupData[{

Cell["Import files", "Section",
 CellChangeTimes->{{3.777729144270573*^9, 3.7777291462539325`*^9}}],

Cell[CellGroupData[{

Cell[BoxData[{
 RowBox[{
  RowBox[{"files", " ", "=", " ", 
   RowBox[{"FileNames", "[", 
    RowBox[{
     RowBox[{"NotebookDirectory", "[", "]"}], "<>", "\"\<*ns.tsv\>\""}], 
    "]"}]}], ";"}], "\[IndentingNewLine]", 
 RowBox[{"files", " ", "=", " ", 
  RowBox[{"files", "\[LeftDoubleBracket]", 
   RowBox[{"1", ";;", "3"}], "\[RightDoubleBracket]"}]}]}], "Input",
 CellChangeTimes->{{3.777729155170438*^9, 3.777729174509781*^9}, {
  3.777729209510645*^9, 3.777729219373415*^9}, {3.7777957872395897`*^9, 
  3.777795787395627*^9}, {3.7778130902216473`*^9, 3.7778130979226856`*^9}}],

Cell[BoxData[
 RowBox[{"{", 
  RowBox[{"\<\"C:\\\\Users\\\\Federico\\\\OneDrive - OnTheHub - The \
University of Oxford\\\\EPR \
Measurements\\\\2018_08_JiMa\\\\2018_08_DFB1\\\\Repository\\\\EPR\\\\04_CPMG\\\
\\Low Temperature CPMG\\\\CS2\\\\001_80K_CS2_272ns.tsv\"\>", 
   ",", "\<\"C:\\\\Users\\\\Federico\\\\OneDrive - OnTheHub - The University \
of Oxford\\\\EPR Measurements\\\\2018_08_JiMa\\\\2018_08_DFB1\\\\Repository\\\
\\EPR\\\\04_CPMG\\\\Low Temperature CPMG\\\\CS2\\\\002_80K_CS2_340ns.tsv\"\>",
    ",", "\<\"C:\\\\Users\\\\Federico\\\\OneDrive - OnTheHub - The University \
of Oxford\\\\EPR Measurements\\\\2018_08_JiMa\\\\2018_08_DFB1\\\\Repository\\\
\\EPR\\\\04_CPMG\\\\Low Temperature \
CPMG\\\\CS2\\\\003_80K_CS2_408ns.tsv\"\>"}], "}"}]], "Output",
 CellChangeTimes->{
  3.777785368336258*^9, 3.777794764474884*^9, {3.7777957711888213`*^9, 
   3.7777957879141674`*^9}, 3.7777958406435523`*^9, 3.7778131033379974`*^9, {
   3.777813195735182*^9, 3.7778132129104223`*^9}, 3.7778157420209875`*^9, {
   3.7778157836899157`*^9, 3.777815799040047*^9}, 3.7815040490678945`*^9}]
}, Open  ]]
}, Open  ]],

Cell[CellGroupData[{

Cell["Cycle", "Section",
 CellChangeTimes->{{3.777729632541539*^9, 3.777729633108033*^9}}],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{
  RowBox[{"For", "[", " ", 
   RowBox[{
    RowBox[{"i", "=", "1"}], ",", " ", 
    RowBox[{"i", "\[LessEqual]", 
     RowBox[{"Length", "[", "files", "]"}]}], ",", 
    RowBox[{"i", "++"}], ",", "\[IndentingNewLine]", 
    RowBox[{
     RowBox[{"experiment", " ", "=", " ", 
      RowBox[{"Import", "[", 
       RowBox[{
        RowBox[{
        "files", "\[LeftDoubleBracket]", "i", "\[RightDoubleBracket]"}], ",", 
        "\"\<Data\>\""}], "]"}]}], ";", "\[IndentingNewLine]", 
     RowBox[{"tau", " ", "=", " ", 
      RowBox[{"experiment", "\[LeftDoubleBracket]", 
       RowBox[{"3", ",", "2"}], "\[RightDoubleBracket]"}]}], ";", 
     "\[IndentingNewLine]", 
     RowBox[{"experiment", " ", "=", " ", 
      RowBox[{"experiment", "\[LeftDoubleBracket]", 
       RowBox[{"4", ";;", 
        RowBox[{"-", "1"}]}], "\[RightDoubleBracket]"}]}], ";", 
     "\[IndentingNewLine]", 
     RowBox[{
      RowBox[{"experiment", "\[LeftDoubleBracket]", 
       RowBox[{
        RowBox[{"1", ";;", 
         RowBox[{"-", "1"}]}], ",", "2"}], "\[RightDoubleBracket]"}], "=", 
      RowBox[{
       RowBox[{"experiment", "\[LeftDoubleBracket]", 
        RowBox[{
         RowBox[{"1", ";;", 
          RowBox[{"-", "1"}]}], ",", "2"}], "\[RightDoubleBracket]"}], "/", 
       RowBox[{"Max", "[", 
        RowBox[{"experiment", "\[LeftDoubleBracket]", 
         RowBox[{
          RowBox[{"1", ";;", 
           RowBox[{"-", "1"}]}], ",", "2"}], "\[RightDoubleBracket]"}], 
        "]"}]}]}], ";", "\[IndentingNewLine]", 
     RowBox[{"A1", " ", "=", " ", "1"}], ";", "\[IndentingNewLine]", 
     RowBox[{"Tm1", " ", "=", " ", "13000"}], ";", "\[IndentingNewLine]", 
     RowBox[{"x1", " ", "=", " ", "1"}], ";", "\[IndentingNewLine]", 
     RowBox[{"T11", " ", "=", " ", "8000"}], ";", "\[IndentingNewLine]", 
     RowBox[{"T21", " ", "=", " ", "55000"}], ";", "\[IndentingNewLine]", 
     RowBox[{"nlm2", " ", "=", " ", 
      RowBox[{"NonlinearModelFit", "[", 
       RowBox[{"experiment", ",", " ", 
        RowBox[{"{", 
         RowBox[{"biexponential", "[", 
          RowBox[{"t", ",", "A", ",", "T1", ",", "T2"}], "]"}], "}"}], ",", 
        RowBox[{"{", 
         RowBox[{
          RowBox[{"{", 
           RowBox[{"A", ",", "A1"}], "}"}], ",", 
          RowBox[{"{", 
           RowBox[{"T1", ",", "T11"}], "}"}], ",", 
          RowBox[{"{", 
           RowBox[{"T2", ",", "T21"}], "}"}]}], "}"}], ",", "t", ",", 
        RowBox[{"MaxIterations", "\[Rule]", "400"}]}], "]"}]}], ";", 
     "\[IndentingNewLine]", 
     RowBox[{"Print", "[", "\[IndentingNewLine]", 
      RowBox[{"Show", "[", "\[IndentingNewLine]", 
       RowBox[{
        RowBox[{"ListPlot", "[", 
         RowBox[{"experiment", ",", 
          RowBox[{"PlotRange", "\[Rule]", 
           RowBox[{"{", 
            RowBox[{
             RowBox[{"{", 
              RowBox[{"0", ",", "Automatic"}], "}"}], ",", 
             RowBox[{"{", 
              RowBox[{
               RowBox[{"-", "0.02"}], ",", "1.02"}], "}"}]}], "}"}]}]}], 
         "]"}], ",", "\[IndentingNewLine]", 
        RowBox[{"Plot", "[", 
         RowBox[{
          RowBox[{"nlm2", "[", "t", "]"}], ",", 
          RowBox[{"{", 
           RowBox[{"t", ",", "0", ",", "360000"}], "}"}], ",", 
          RowBox[{"PlotStyle", "\[Rule]", "Green"}], ",", 
          RowBox[{"PlotRange", "\[Rule]", 
           RowBox[{"{", 
            RowBox[{
             RowBox[{"{", 
              RowBox[{"0", ",", "60000"}], "}"}], ",", 
             RowBox[{"{", 
              RowBox[{
               RowBox[{"-", "0.02"}], ",", "1.02"}], "}"}]}], "}"}]}]}], 
         "]"}], ",", "\[IndentingNewLine]", 
        RowBox[{"Graphics", "@", 
         RowBox[{"Style", "[", 
          RowBox[{
           RowBox[{"Text", "[", 
            RowBox[{
             RowBox[{"\"\<\!\(\*SuperscriptBox[\(R\), \(2\)]\) = \>\"", "<>", 
              RowBox[{"ToString", "[", 
               RowBox[{"nlm2", "[", "\"\<RSquared\>\"", "]"}], "]"}]}], ",", 
             RowBox[{"{", 
              RowBox[{
               RowBox[{"2", 
                RowBox[{
                 RowBox[{"Max", "[", "experiment", "]"}], "/", "5"}]}], ",", 
               "0.3"}], "}"}], ",", 
             RowBox[{"{", 
              RowBox[{
               RowBox[{"-", "1"}], ",", 
               RowBox[{"-", "1"}]}], "}"}]}], "]"}], ",", "18"}], "]"}]}], 
        ",", "\[IndentingNewLine]", 
        RowBox[{"Graphics", "@", 
         RowBox[{"Inset", "[", 
          RowBox[{
           RowBox[{"nlm2", "[", "\"\<ParameterTable\>\"", "]"}], ",", 
           RowBox[{"{", 
            RowBox[{
             RowBox[{"2", 
              RowBox[{
               RowBox[{"Max", "[", "experiment", "]"}], "/", "5"}]}], ",", 
             "0.5"}], "}"}], ",", "Left"}], "]"}]}], ",", 
        "\[IndentingNewLine]", 
        RowBox[{"PlotLabel", "\[Rule]", 
         RowBox[{"Style", "[", 
          RowBox[{
           RowBox[{"Text", "[", 
            RowBox[{
             RowBox[{"ToString", "[", "tau", "]"}], "<>", "\"\< ns\>\""}], 
            "]"}], ",", "Black", ",", " ", "24"}], "]"}]}], ",", 
        "\[IndentingNewLine]", 
        RowBox[{"FrameLabel", "\[Rule]", 
         RowBox[{"{", 
          RowBox[{
           RowBox[{"Style", "[", 
            RowBox[{"\"\<2\[Tau] (ns)\>\"", ",", "Black", ",", " ", "24"}], 
            "]"}], ",", " ", 
           RowBox[{"Style", "[", 
            RowBox[{
            "\"\<Echo Intensity (arb. un.)\>\"", ",", "Black", ",", "24"}], 
            "]"}]}], "}"}]}], ",", "\[IndentingNewLine]", 
        RowBox[{"LabelStyle", "\[Rule]", 
         RowBox[{"Directive", "[", "18", "]"}]}], ",", "\[IndentingNewLine]", 
        RowBox[{"FrameStyle", "\[Rule]", 
         RowBox[{"Directive", "[", 
          RowBox[{"Thickness", "[", "0.003", "]"}], "]"}]}], ",", 
        "\[IndentingNewLine]", 
        RowBox[{"Frame", "\[Rule]", "True"}], ",", "\[IndentingNewLine]", 
        RowBox[{"ImageSize", "\[Rule]", "750"}]}], "\[IndentingNewLine]", 
       "]"}], "\[IndentingNewLine]", "]"}]}]}], "\[IndentingNewLine]", "]"}], 
  "\[IndentingNewLine]"}]], "Input",
 CellChangeTimes->{{3.7777296365536613`*^9, 3.77772981544491*^9}, {
   3.7777298515333395`*^9, 3.77772993716654*^9}, {3.777729979884694*^9, 
   3.777730208797492*^9}, {3.7777302637871933`*^9, 3.77773026659082*^9}, {
   3.777730335175645*^9, 3.777730368549628*^9}, {3.777730487455556*^9, 
   3.7777305634073553`*^9}, {3.7777306541864233`*^9, 3.7777307028890095`*^9}, 
   3.777794777927989*^9, 3.777795811869398*^9, {3.7777958817599616`*^9, 
   3.7777958836370735`*^9}, {3.7778131085767946`*^9, 3.777813111666261*^9}, {
   3.7778157277984123`*^9, 3.7778157599219427`*^9}, {3.781503998924348*^9, 
   3.781504010230629*^9}}],

Cell[CellGroupData[{

Cell[BoxData[
 GraphicsBox[{{{}, {{}, 
     {RGBColor[0.368417, 0.506779, 0.709798], PointSize[0.007333333333333334],
       AbsoluteThickness[1.6], PointBox[CompressedData["
1:eJxVWHd4VNUSv7vZZJPdIB3UAIk00YcIqKDUGaoKQijSyxIFniK6iAYExIt0
EVh66EtVHy1AQAglS28CSYSEhACbhDSSkN7bO/fO/JGT7/d9yS8zZ86cOXPm
zLlvBH03fKpRUZS9BkXRfus/9i1Af+T21n+5d0OzAbv8BuzKJN5jP9xr0VDg
JfEf/oRDhZMFWH74MMwf/KEA8wWhEO/dXOAF8ZAT8OLoNA3Ew8LgctwXAszj
T0Onz37t+Nmv6cSLz8DZpu8KZBBvdg4+7rxsYOdlacQ/vAAhCau2JKxiPikC
lPEHasYdYH7BBU1TPASY37kEsZvXx2xen0o87jI02T5EgHnWFWi7o6cA8/Kr
sPnjNwSY17kOQ2ZpYO53A67OvHdl5r1k4m/dhJlLXhFI4XjdgrAbS07eWMLy
obehR3ZM9+wY5hPvwHzj4nnGxUnE7f/AyZZvC7B84V3oGzxAgPnv92DGoE8E
mG+7D0EdvhOg8eqoSHjvx9ECJFefREJmqZ8A60+Pgngt3JcTib+MgsSsThpI
f040hJ9fefb8SubV0XB57dFLa48yX/ov1Juwse6Ejc9ofN0H0GDJVwLs/+YH
EDjUJuAmff+HYMipK8DjDz6EYVsbCzB/JwZcx9dEHF9D9tSwGKg59akA2+8V
K9lTrsVCaPlIAbY/5BHsXP54x/LHCcQfCt6+i8AT0p8cB73DvQTYXmocPPU3
aiA+Mx5WL8v6fVkWjy+OhxbfzhYgufrzY9BpC9Y3J8DOJHVHkkr6ypoE6HDb
LMD6TZ/A+eeTBNjeridwZMXtwytus367p3C+t0mA5YefQo/1nQRY3uUZDNID
EE/yiGcw9ptuAnE6h1ZuGFd/09j6m4i7prml8eohN5wLLAwPLKTxSo4byrTt
z3xE8s6JcKe4p8BjsjcnEV670kqA7YUnwltXGwjwfNWJMDA9ckB6ZAzZ65sE
se6BGkh/eRKczhkrQHK4kwQf6gWA5nO9kiyNh+HJcObuTwIkV7Ykw+iMiFEZ
ESRX45NhS9dOAmQf/J/z+SS5K+g5jHl0f/Sj+yw/+BwG6AeE/csU+sUFjYsL
HpL+uykQM/jJQwHSn50i+eM6nQI3ulVf71bN81ekcH0h+0rvVLjxbIwAcfXX
VHgTQ9piCK/nRio0PtxLgOwrvmlwanxO2PicB6Q/NA3SeiSk9khg/zakQZFW
Lg+R3BWbBg31gEeTPb90mK4XSNa3pYNJTxjSh73p8NDYTgPJ09Khn9+evn57
/qX53s6A5DYlSW1K2N53GbDxa4MAz3ciA76Y21qA9KE4A543MguQXOn+AvbF
Lt0bu5TGu355AZdejBCIIvtXhXyBe+8CN8kV70xorScQzz8oE67cnC1AXFmb
CX16LsKei3h8dCbM2l5g314QSfM3zYLcfTMEiLvGZUnjYVcW/PvLkWgBspec
BXtXR+5ZHcn22maDvl0Deb0zsmHRDu2Asr2j2TBlm0mA9QuyoaF+gbF/XV/C
pLsPJt59cJfk815yvSN9iHgpUvb2sOTbxBVTDnTWDxzbG5gDSet+T1z3O8tX
5UCLW68K3KP57+dAbnU9AfLH6ZML2m719WP99rngGqUdgPuk/1kuwF9NBEg/
wJ4Lk75/V4Dsudflcv0i7jyZy/WKuO1hLtdXsh9QkgsBExf7T1xM9tXX8uAN
/ULj9XXPg13BmTuDM2n9MCkPFr72XwGyp6h5oA5/R4D92ZMH/noASa5eyYPK
vq6Kvq475F9KnrR+xZwPC++f+Pn+CbJveysfFuStn5+3nvRdg/Jht2WUAPs3
Mx9+8Z4rQNy9Nl+az3k8H35+e4wA2VMe5MPFubcuzL1FPKAoH57O++PJvD94
P5sWQPiU52enPL9F9j4qgPKpzrKpTuLO8QUQ4fu+wH2+bwugdLlasly9QfZ2
F0CFdt2E3iZ7lwq4/pHcnVwAO0LubA+5Q+tRPAu5PpHc9mYhjNYvZLb3SaEU
D3VGIfdXHL/VhVJ8nMcKofvHCwSI26IKQW9vatif/EKY4ygNdpReJ964CEqj
PhC4SfvZtQhOnd4YdnrjVbI3tghqZmyqnrGJ82V+Ed8PpO/aWQRn2vkLEA9w
FcGDM98L0Hh3YhEUh9gFaD6nRzH3V7zeNsXgV5n+emU6+RcwsBhiu2sND/v3
VTEs0Bf0D/m3qhjm6RcC78eRYihz9RcgrkQWQxM9oa+RvbxirrfE3Q1KJP/g
gxJ49UFDAfLfObqE+zeaX5lXwvWTxru2l/D9xf5dKIGCRavyF626TPaflUBV
7NsCtF9OQylEO3ZGOXZeovW2KoXZPzUUuEL2+pfCXD2BaX73tFIYER0/PDqe
7MHKUniklde9FC/lUCl8MGKOAPlju1sKwXvSf9yTzuvNKeX7i7havwy66BvM
/P0yWJ+2bF3aMvIHRpXB8BVtBGg+V3AZFNq1gkv+BWwtg/e/nC5A8VLPlUHX
tMQuaYm0fnhSxv0FxT+gfrk0v6tvOZzW2rMa5tPKwaY/ACJovcvL4X39QPF+
/K8cikxeAqSv/FMOm/dd37TvOq8vuxz+vRUkQP65X6mAkc0cI5o5mHeq4PvB
RfEfUQGNg1Y2ClpJ9pXgCtDL4yRe75YKaKQnAI1Xz1ZwvScOjyu4XyV9paoC
Ctqm5rdNJW7zr5T2w4WVoLf7Qyi+yo+VoLdbPXj8H5V8v5I/tluVEPbNs5Pf
PON4Z1ZyfaP4qHWqJP+dHaq4XpP9gC+q+P1D63UvqZLyTf27Sso3iKvifoLt
VchyV7NqqHfwEwGyF9C7Wjo/AUHVME4/AGdpvsXVMHJafwG2d6BaPg+PqmFD
wGABjq+1BjbEaA8qkqsdamC2fiCJO4fWwLo+7QX4vMyqge9T/pyV8ievd0MN
NLrQQYDrS1iNnL/pNaC9NupOILnDU0Hq98/r3N5EwWG97AJkz/6ugvp1539B
54GgIN3XPN9wBanentN5aJCCCZj0GJOIu2crGKA/D2i/XEvEfHq/T/PlblKQ
+mWKl3pQwVl6QaT42v5WsP6g/fUG7SfuuKlg7fi74hSU8vmFsK+/V8hfh8mA
1I8Qdzc3yP50MGDt+OT2NkjjIwMNqGXfyW9IXwkyYEM9IWi/nPMNUrycGw1o
1//B/h41IL23iNsjDFg7/wMjDfi51TnS6gyj9ScakO7ni7T+fNkfxdeItfe7
Y3Mj1j4fahcj1q5ftoFGKV6OMUZ8XNJegPbH/pUR/UaveX30mnDyZ54RqR+i
+dVVRnk/dhjxeMaXAmTfccSItc+T/aIRm+kPZLIfEGvEpr9NEvibxucZsXb+
Oowe6K9fkBRfe0MPrF1/nK09kN6nvL89PST/HKM9sPZ5cds9cIze0Jwh/3/z
wAkffS1A+Wbb7oET280T4Pw47IGNtXb9OZ0H+wUPKT7Oex5I9wv5rz6Tx9ty
PTA/oaMAze8wmJC+n5C+vYFJ9r+VCUf1mypwmu8bE+rPsSY0n62/CbVqPaIZ
79coE1L/R+u1TzchnV/KF+dcE+rPlb6HyN5Kk5R/tm0mPN7PIsDxPmTChB3a
gef9P2+Szl/gXRNu1dqv7Ry/pyaMGqA98NhejgnpewfpOxRPyX97fU+crG84
+RvY0hPHjf9UgPJLfc8Tqb/j9fbzlM6f43NP7KQ/WDmfpnlK/jnneMr5ucIT
9efIFLJv2+rJ+XWc70tPpH6K9+OcJ8eL5g/8xxPr6w+KULL3RJbbXsr+O2o8
pXpgr+eFUZl9BPj8v+GFLVpfbN76IuVHbjcvpP6Sx4/0Qv1zWFuut1O9ZH+C
veR4LfeS6octxAsn6x9EOP//8kK670+SvXAvjPvhxKMfTtD+Bd7xQvoewPmW
4IX69TiM4mnL9kL981Nd8sdR7YWRlZ0FuF7VNaPe/r1K+RYYYEbqv/k8dDLL
+dvHjCe0z08RnG8jzJK/9i/N+mu/LZJ/9RaapfWGbjHj2JZLx7RcSnLHn2ak
99YxGn9WyPUPCLy+22akfvYU+fPYjHr7Hkz+h2aZpXxzVJmR+lXSdzTxRurH
eHxHb4zaoz2IKR9s6C3FwzHcW4qX/Qtv3Jw9X+Ag7f8P3qh/HRlM+68u9cZX
f/pWgPy1bfZGes9Q/Bx/eHP9ofjaz3hjyKLULYtSSe685S2dNzXeG7XXRvUM
8teWKcsdld5I7wPa79xGPjhB+3wSRut3tfXBrdpzo5j9AR/c7XLucjlpf5Rx
Pkjfc2l84GwfpPc6nSd1iQ9OfHp1wtOrtH7XLh+k70Pkj/1vH9wUpj2QuD7d
9JHuXzVO6OsJQ/ZtL3yQvkecIP8rZH1oZJH6C7WDBamfIvuhvS1I/Q5xR6AF
qX/keE6xIH0PIvuB31uQ+nGO52KLVO9sGy0YrT33Smm9jgMWab/spy04Xjkw
TjnA9+UNC44qP/Z5+THOn0cWpO+LfL4yLEjf33i/yy0Yf2SOAI13Wa1I7y2O
VzMrfq5fGNwPvGOV/Lf1kvUdQ618PxwlezarVN+ds6zSfQarrLgt/NDW8EOc
L/utcv93yirtp/O6Fen9x/dBrBU3zNce1OxPupXzn/bTUWaV8slu8ZXi5fTz
5XpP49X2vlJ9sPX05fp5hOwN8UV6/9J4+2RfpH6b/Au0+2JMXlcBrm+LZPu2
9b648drBDdcOUn107POV9tce5ivdp/a7vkjvW7IXmuYr1QdHqS/3f1xvfepg
3MXpAnx/vl6H6wXfJ/+pI9UPtV8ddB4L3X0s9Fjv/wNFdj9r
       "]]}, {}}, {}}, {{{}, {}, 
     {RGBColor[0, 1, 0], AbsoluteThickness[1.6], Opacity[1.], 
      LineBox[CompressedData["
1:eJwVj2k41ekfxgnJVonfGMZWQtkTjVS+z1OjVBMjDYaiSCImTMZf6ViSRPYt
jBSasdUPx74k+4ylcBwdzbEcpxOHLAch6/R/cV/39bmu+8Xn3u1087zLFj4+
voSv+X+TVjM7Qha80flKxfuTlrNw1dWvaIB6C/ndFz0QgWehOUkg2jPtDkow
ippqkZ+FXaNtZUEoGGmX3+gXWpyB41+ictqpocjw6L4YgYoZyFKXC3FIi0T7
q5JD5U/MQK/JiFeuRAxq362UsltiBvg1abr+KA5l5wyeMx+YhgPHUxWbqIlo
I6klTsFvGuK8VNes09KR4O1e2aGmKdAICJ9ftcpAh2KzLs6mTkHjg8mJpxKZ
yLXsw6ENrynwf8vw8EXPkHWzdW777inI+/jEvp6ag6B69kHFo08gQmgetkor
QBY02faJwEnoT2OWqvoVotXXc9XxlychSzlab9nqBQpxtynLx5NgrMVTz5Ag
0Xp3j8h3QpNQ9sw+8jdUjMSzhnnpsRPAqdx9u45aiuqOTAvlVXDBdOyFjWVa
DWIxTrYbGo1DyN7f5AR31aKWuAC/I8rj8PqK0WD5w1qUb6cdeHvbOBxlNjrJ
+9ehXx+ECTwdGAP9nneeYzb1aMr7Es2dMgaxg3yNryIa0IThGWnNno9AadNg
XDBrQQbUz6e2JnNA4VrUYZ3QFoSal2Ii73GgVnA2Tfh1C1LP5Djpe3NgBZdd
qv6+FVlqN/eN/sgB31pgK6m3oT1l4/mNQhzwKL4wPSH0D4rvyNpUufsB7NIp
gsFNnUin2eEvgSA2dN/xk3Je7UT757fd3PBmg+lFrz2mB7vQz/w1OyWuskFP
wQmJZHeh7p5cWRczNghnmgbEhbxB7bI2cyuSbLCz3LrSrdyNtC+mFCfljsLW
n7u8WcM9yDqS9en6KAtwy2n/3tUeJBqHP0X0syDAsDWoSaYX5fxZ3FDTzgIe
UR/z3KIXHct09j5NZQGzv+iFW30v2mF6MEryPguotolc3hMaijIYR0c0WXD5
ov2VLQ50ZGNjPG4cPAL1n3y+dfWnf/UJFTD0GwHFuxFvOxLpSO8yQsaeI8DM
qDqW1EFH+zvXu1x+GQHbYRm5fYf70f5A+W9AfwR+currPSf9Dj1p7WqidQwD
un7uh9R2Bjr2olrsXN4QZC5fXV3nMJBQeLtfU8oQbIQHlDjxDyDL6M3Bs2FD
UJtXoKxlNIDot3xU452HwGhSZP3V8wFUA6wHPMUh0Pu1texD0Hvkq5lXxH48
CMq3QF3veyZaWGgaHH3MBEIlHsYuMBHPZmaRCGeCaO8Hmyc+TPQmcDDYzo8J
C7oR4eIvmWh2sZEiY82Evyf7uON7B5F6w6qigzQTbjq7Fz7bNYRINzNCOPFf
eHU+6YDU9DBy+oPqLp/5Hl4+/qxwp5eFhnudhdOHGfAkKJRuO8JClKm341Y0
BkRfl4o6NM1CJkw9W5k2BvxqdGCNJzKKzM4ThXUvGaDL8Hh/HX/lcqfaMAoD
imQ+JFsXjaKAlB/dNpUYUJLcu0M/mo2mLVzyD7m/g4pEkp97moOkYvvsf5Ht
hzkxJnfGloNmEypXQrf3g869bb2LrhwU9vl3WpVAP+R4X8kSDOOg1WnYCtN0
iDWXOqHcyEHCHF0ob6LD9W1+oTbGH9Fefcd8cy86yAWYCLdqjCFXAbsjI2/7
gOLcJZ4txkXfJVYvU/6kQYd7W6ezHBcty1r8QM+gwbc+DY/27ueiEwv2oJ9E
A2pQmfifJ7koQC9cnS+UBuMZGeJ5wVw0pyawNnGFBucZnuLkEhc9XM8uXVSk
geq57eI17AkUZJn/Y2VGL3QeshCj1XxChotjxTGFPdCUkMY7+c0sclvS9Y9S
7gaKL3i3z/OQwV0V2xi3LphxSb6UUDyPNENFN9dVOyDHNvNEyrXPqI/5OMvY
+B+oMLA71oCW0Baq5NNbN9ogSKktW291GVXpmTsqzrdA7jxHofX9CuIyTWT+
jmoG6fbyuOTiNbRup3hVxa4JDMnDPoXXN5Dx2N0v4/aN8K/J9wdv7eHDpjL3
TNKuNcDvL/LZpXz8+K2L/5ph2mto2LmUEc7jx2FVzOiHf9WDjq88/cvgFqxl
dkZY7cwr+DyS1hhVLYCfqAzPuqrUgQeeqyrNE8Sldy2uBPDXgklelutGuBB+
FfrUR0+sBvR3acVznLdiga6dLJp2NdBvRrc6WgpjjyaOdLhlFdD6Thev6WzD
DelLHjcTKyFIZ+i5lpII7rSvi3F4VwEWD8/KrIiK4lqxl+abmhXgPykJEx9F
8Qn1oya+KeVw/nixlyddDKsSB1Uv8ZdD2NM8W6lScRxXwZu+SykD5ubtOuto
CfwpSXd+SagMWFaqWtp3tuM3iv8aCUWWAib3WarZ7sDaQvu3zyqWQm7gFjSg
shM3zM8VmBVR4ZJmRklRwk580cHyKsWcCtk2OWxrfkl8IUch0Wq+BNBGSurJ
/0niwze+TB9OKoHIfZX5p8YkcewZFB6IS0C7qxnFO+7CmRoS/n0TxXB57lhS
AX0XHpD5QKOkFgNOZ//Qf0IKy6gnjhb9VAz+r3z9z9RIYbN+eakewWJwdDEQ
6daQxuXqp0afvS6C/keONnsfS2PmhcJW6aAiyNHx02jcTmA3VeM/bhwtAuUL
Nbbedwnc58OglmyQsGZunOAYSOCws0Pc1DUSBk5XdZ0L/rrXiXALXiEhHiqO
a9wnsNKKr6nlIglCmlQt9iMCZ2IJz4UpEib4C/h+/oPAdLWBa2aDJJSSablG
NQSuLeM5q9WSEJsvy1arI/CQ+8dn31ST4Pn8sQJRT+AdvdlqwpUkqKUnx/Ma
CeyeqyTIpZKQGhYfkN9O4AX9l+JFBSRQLkX8JP+ewLL+THQ2nQR7W5FIUSaB
/av4WJBKgpFVeMvyIIExParVIIUEnlmYMZ1FYMpy5BWlBBKuGoTsjeYS2MG7
pm8pggSky+8YMElgsTf/ZEyHk6CgEZTqPkXgYy8TCzhhJPQrUbaf4hH4fqBo
Ul8ICVS5dTPDeQILd0R4dQZ9/UME3FP5TOAxc5/YZgoJHjtX6ySXCBzztmCh
NoCE02K3lzeXCVwotyej7DYJ/wFkNISg
       "]]}}, {}}, 
   StyleBox[
    InsetBox["\<\"\\!\\(\\*SuperscriptBox[\\(R\\), \\(2\\)]\\) = \
0.995785\"\>", {95904., 0.3}, {-1, -1}],
    StripOnInput->False,
    FontSize->18], InsetBox[
    StyleBox[
     TagBox[GridBox[{
        {"\<\"\"\>", "\<\"Estimate\"\>", "\<\"Standard Error\"\>", "\<\"t\
\[Hyphen]Statistic\"\>", "\<\"P\[Hyphen]Value\"\>"},
        {"A", "1.0573168235239745`", "0.00756957718886719`", 
         "139.6797730101759`", 
         "5.1885239841086510398287243938047105`12.999162534870187*^-351"},
        {"T1", "28410.905197728505`", "437.34092300042107`", 
         "64.96283266338914`", "1.4102019154869154`*^-219"},
        {"T2", "615597.8723313962`", "40494.72176627179`", 
         "15.201928683064322`", "8.356579867874857`*^-42"}
       },
       AutoDelete->False,
       GridBoxAlignment->{"Columns" -> {{Left}}, "Rows" -> {{Automatic}}},
       GridBoxDividers->{
        "ColumnsIndexed" -> {2 -> GrayLevel[0.7]}, 
         "RowsIndexed" -> {2 -> GrayLevel[0.7]}},
       GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}},
       GridBoxSpacings->{
        "ColumnsIndexed" -> {2 -> 1}, "RowsIndexed" -> {2 -> 0.75}}],
      "Grid"], "DialogStyle",
     StripOnInput->False], {95904., 0.5}, Left]},
  AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
  Axes->{True, True},
  AxesLabel->{None, None},
  AxesOrigin->{0, 0},
  DisplayFunction->Identity,
  Frame->True,
  FrameLabel->{
    FormBox[
     StyleBox["\"2\[Tau] (ns)\"", 
      GrayLevel[0], 24, StripOnInput -> False], TraditionalForm], 
    FormBox[
     StyleBox["\"Echo Intensity (arb. un.)\"", 
      GrayLevel[0], 24, StripOnInput -> False], TraditionalForm]},
  FrameStyle->Directive[
    Thickness[0.003]],
  FrameTicks->{{Automatic, Automatic}, {Automatic, Automatic}},
  GridLines->{None, None},
  GridLinesStyle->Directive[
    GrayLevel[0.5, 0.4]],
  ImagePadding->All,
  ImageSize->750,
  LabelStyle->Directive[18],
  Method->{"CoordinatesToolOptions" -> {"DisplayFunction" -> ({
        (Part[{{Identity, Identity}, {Identity, Identity}}, 1, 2][#]& )[
         Part[#, 1]], 
        (Part[{{Identity, Identity}, {Identity, Identity}}, 2, 2][#]& )[
         Part[#, 2]]}& ), "CopiedValueFunction" -> ({
        (Part[{{Identity, Identity}, {Identity, Identity}}, 1, 2][#]& )[
         Part[#, 1]], 
        (Part[{{Identity, Identity}, {Identity, Identity}}, 2, 2][#]& )[
         Part[#, 2]]}& )}},
  PlotLabel->FormBox[
    StyleBox[
     InterpretationBox[
      Cell[
       BoxData[
        FormBox["\"544 ns\"", TextForm]], "InlineText"], 
      Text["544 ns"]], 
     GrayLevel[0], 24, StripOnInput -> False], TraditionalForm],
  PlotRange->{{0, 239760.}, {-0.02, 1.02}},
  PlotRangeClipping->True,
  PlotRangePadding->{{0, 
     Scaled[0.02]}, {0, 0}},
  Ticks->{Automatic, Automatic}]], "Print",
 CellChangeTimes->{
  3.777785321234124*^9, 3.7777853707808514`*^9, 3.77779478244925*^9, 
   3.7777948190579433`*^9, 3.7777957670511417`*^9, {3.7777958131528883`*^9, 
   3.777795843998119*^9}, 3.777795884855309*^9, 3.777813113794306*^9, {
   3.777813197419619*^9, 3.777813214614976*^9}, {3.7778157437027316`*^9, 
   3.777815800875432*^9}, 3.781504053025584*^9}],

Cell[BoxData[
 GraphicsBox[{{{}, {{}, 
     {RGBColor[0.368417, 0.506779, 0.709798], PointSize[0.007333333333333334],
       AbsoluteThickness[1.6], PointBox[CompressedData["
1:eJxdWQl4TGf3v5NtJplkcidF7MZWSkts1dLKeWmppaRKGyWkavu0iFrrU8a+
FaPUvow9scYS+zKIfZsQBEEsIQgmEdkl/3vv7/yf57u9z32e5JfznvOe7T3n
vDfV+w7r2t9LkqR9BklSf2pP7ArCL55w7Uet9fR3rfbK+wJ4ZCwl7FWfTODE
7XRk5eQl33uYPnsXnW90/9W4GMaN99LZsftfnmifAXxnH/1T+fG9HcZnwJMP
0u+WBXXH/8a43hGK6pqz8Ul5xteO0eLbXxyqcfUp8FEXTbsSrbzpwNaTVMZ1
tVfXHMb9T1FMSKJX8yDGBxNpTwtD8aXajIPOUJ8O87KG3noM/PNZ6qg9jBPO
0ZXqIdPmv2Lsf4FKEo87npsYR12k1BFn99drxnjXJYooNi+bF/YI2PcKlS0K
vjToJeMeV6nVvjc5NS9ivf0HN6nafN0HdLuURJN6faC8D4G3JFFBaOMqPycy
7naNsjzqkwZcco0m1PbLlI4yPfY6OX6tobxM75pMK87HfNe8E+PiZNp9pOJ/
6uU+AN50g65HHOw/yovpETfJ/8ly05PljAtvUtauPzdX63EfeMMtujnjTKE7
kvk7p9DsY4uUCDI9P4XjxfR1t2nNuEbKy7jTHVp1IkB57wHn3iHfhpvT0suk
AjvvUpRq/iTGHVKp1bu+ygv5UnYq1fz2dIl3kzugr75HR3uoEQCW2t4nx6uW
789lMz37PrXe8sOAtxmMVz6gii/b/PLnIMinmmmkBGfyzTO3gcem0a0pC23l
DjC+nEY7zD9VeiYzrvGQYleFZzXsB3k05iGtMKkO4/0vPqSFD9cNXSozvfoj
GjDKK39ZR8ajH3H87wJffES1Z/oOrVjvFrDtMSnBVCxiPOoxvZjuvzbnCbB0
/jFtGNz/0/k7UmCP7QmVfxsX+jaO1498Qt7Ng/7p+QPj80+owUeFXX//C9he
LZ0ME57+va7hDeCR6WSvft3atnIy1p9Lp9vHrs//eOdN4CpPSdYcBGwf8ZQ8
ivZbFzD97FOKWxYYOuoU81d+RqVKcA45IZ+GP6Nzuasm9PuD8ZlnNPZzNeKM
K2XQvd3qgWQck0FauFsxPp1Bznz1ALD8is+paeTaJpFrrwMPe04rT385ZvzW
a8CJzykvNWt7h8u8vsILmnyn4IPS1tBXGvKCnpZRKxTzn3pBE5Ts7j0X66XQ
l7T4RzXDQLcPfUnrfr/4wsfD60++pD1Fc3cXzeX9QjNJvCqeNbE6rx+SSc07
mTbWOc70E5mUNlCNALA99BWp1TAkkem/vqJILaGZ/8Qrrp+8vtxrmqGG/0de
P/g1Zcwb1n3wh6zP8dfUZmB864HxTC/zhjp0USuCG/g/byhPdX8zph97Q4vL
x3vnDEgCDvCQWv2mLMR6W1MPHYkK7jw5EtjZ20PPuqgFjemzPKT5SWL6Hg/F
Vfpw6rWFV0G/7yFFuVNf32O6KYvUaDWJxH62Jlm0ea3qUNavdxZVrLd/W2eJ
+WdmcX24jHjszqK298KqL1p9Cf5IzaI/cnubK8WC7jRm6+TZGmeTMePyo9Ut
r0B+VDat364eYNBdM7Lpk9+co0sSsZ9zVzZNUbz9ewDW21L18iS/t/T5Nzcu
/FYV+7kavaXHlWt8l5+C9c6eb0mtdm9Gg26b/pa0cjMb+jrj31JuWi3lhF+A
/nfekpa+Tc6B7ptDivP6zDJcBH9Yjm4/5085fL7Pgn9qDp0bOdVqjIM8584c
ap+05O9fjjD/nRxy3/lsxjdlWD+fd3T286/WeXaxfg3f6fXroce2qe+4H7B+
O97RxPWZE9ZnQp7r9juy3//49cHH2M/pncv9kfdvkEvjf3vwvN1i6CtF5nJ9
A7ZNyaUHW5I7TZ/D+m/Ppbv7higv86fo+Z1eeVzvsd72SR65e6kNBvpR5L/o
k/OoixQ+on0S778tj+6q7mh1BvrfyiMlmYo7BIJfMuRT784nLn409jz8Wz+f
Ft0bpryJ2P+HfNrzx8ivVx9l/SflU0LjFe1+fIL1zq35pE4X//Rk+Tfzafns
98YBe09DP0MBVbs7pnBBOrCtfgGtUXZPMbD93QtI7e5iC/ht9gJ6mK4WKLZ/
SwENepMQP+kO9rPdKOB6cQrypUK9/HqFpKX/MWBnt0K6sr5+duZRyLdPKKT5
YY9s3euD3xlXSFO7bb/0NAnrXcmFpARTaaAn4Z+SQp7v4A973SIaLX5VjsAJ
8H9fRGp1bLKE6X8WcX1l/eKKuP5Anv1aEc9LvP/7Iq7foNvqFpMl+cqa/FBg
Z9diUqO37w3LH19Mvf5Zrkw07J/Nxfr9k4opUJ2+bGx/cTHF/bTs8vr6kOeq
855uT4xu2zOU4/vdexraY5U04SnvP/49LVfb2VQX6Jve0zN51smzuUdBT3pP
lZTpqdpS2E/F70k7nqGwJ7pOCWnhKmD7IkrojGpeV2D7uBKatGL6hU+2Mn1j
id6/V0vIeq6Z8rJ/C0voWHe1w3J8a5fq7HV2KaV2WsIB28aV6uyRNpSSUvu7
ZYbDHtvVUpo9UW34R8BfUEoHYtUCDn1cVkm8MNW0dE1g/jqSUJpB2qa1wPSF
JDB/H4O8rpLAfHdcw/JAidsh9I8YL4mqUQsGvknA/o4FklCnf9mM/d2bJHFZ
mX47zMP6mMOSiGg58VGfc7AnIkkSLWlYubxU9vdTSfRRqv+qcGBbsSR+KZ1U
YUgU5EdbDUIZPhKGW0CXPjQIlzKt17RAf0dLg0ire/hB3cPQ1x1h0PMPMIjN
fdU/IN4R/zUI1KfD4HcYxPbOaoHh/TcZxMfK6Sr3KfhdhwzivzunBSVfgXzJ
bRC4//D+6QahjX9bmb/IIDDf7Yf/ZC+dfp7aXuJ/88/Rwkto434P+M/exUtg
XgaW+3vp/B0xzkuU1QYK9v98L4H7FeTbNnqJQxsyOp5vhHjKh7wE5tlD4L/q
pdPP8cRL4P4Gee4CL/G/59tl8RYjtATFeqmWt/jrM7WhQT597i2Qn7vB39lb
hDdVbxSQJ/fzFpnhYUrLxv6eP7yFak38JGDHPG+hlfclzL/eWxxXx9W2oNsO
eAtl+B+8Ie4A9L/iLW59ZVNe6JP22Fugf2K9O99bVNUe6Bdt8RFDVrapFVAN
8fbU9BE7OlzudyAWmD7zEejPiIf7Wx/RYOsHyo0T9kf/4iMqbnNX2OY+iP3H
+ojv1HaaD+yY6yNOTY0Yl10f8Xev8xEb4lKUigT5Mfv/xX/ZR+TUKZnWqR3s
oUc+YsDeUUoF5vOT5yNQ3/dh/yBf0a+oc/juI7DPWcNXoF+C39HcV5cv9k6+
YpTqjp+wn9zXV+fP+NG+4lpZdeLi/P/LV7TULqycP+t8dfrI+30F+iPrf8lX
lGsxpWyLKQngf+gr0K+A3bm+unjHmP0E+gHiG1HdT5efaZ/66fS1dfITSrAU
ibuQf9F+QrtuT4Y/nKP9xH21nS9CvGiOnzAOVifaOA2HOf10+eFK8BNH1etx
Nc6fi358nndi/zQ/oRRHxUKst7/zE2H9WpycOWUv7DcbdfUkwmYUmCdAdzQz
Cty/Ic/dwSjU21odO/zp6mMUSxarD/SPGGUUMdpAzed/tlGXDzanUWB+wHo5
wSg2DmjcKzloD/gvGMXcd2t3tWoKuuOBUWjtKwnYnWMUj5VpoXsc/BkfYBJV
1PH2GPNXM4kTf+1rMGgI4ktNTbr42NubuN7D/3Ifk05exEiTWK1dP2B/2iyT
+LZd+eGOLRz/1SahWlN+eDzyd69JKJcHZeDfgfpx3sT1AfSwByahXR/TIc+W
YxLXr6kP9In29+fzsAnxr+ov0K+hn6OJv5jzhRpR8Lu/8Rfox7A3ure/uDGn
IHlOAejSCH+xRT2ePTfD/pn+3F8gz73KX6i3qeFXt8P+Pf4iqYJ6gKGv85y/
eKCOyz1hryfVn+sB8s+d7S/gQOzvMgaI/GUdZx9bxP25SoCunlLjAHH459Z1
vyyAPHu7AJ2/oqMCdPGJHh7A9XwL+GcE6PLDvjKAzxP0ce0K4PO0FvxnAoS/
Og403or4pQYI9WvCmMOrwZ8VILYt2KR0TPBHG80iepZBadl8/iqbReX+eZX6
54Hf3tjM+RsL+9uaRYB2QWZ9e5nZ/m3In+Fmrq+gO6eZdfuFrTALc2rTbkN7
wP+ueLPAfIr40Fmzzr60u2Zdvro9Zl39iPYL1OkTUSlQYJ6DvxxhgTr93F8H
cj9EvOWegbr8ix8WKNJ/7OuyuNl/0/TYvjxQZ48cHyiitAvcBuTf6UBdfD23
A4U6HY2cyvq/CeT5BvrKvkFCK++9oC9VCtLlm6NhkNDaVxT47V8FiUbR6o0Z
8l09ggTu3/Bn/NAgts8J/acGCdxnkU+u5UFCvV3+uXkN8I4g8YU2sOK8SIlB
YsyXn/n3nQR7PSlBOv3tr4N09sd4W7j/QL5UwSJw34c+aQ0sYtYU9cIC/rTW
Fp3+cg+LaP38/M5E+yroP8TC9RjxcUyx8LwGnLbEInAfWQ/+HRaB+zb0jzhl
4f6JfHWkWHj+w/4xry36+u8drPN3fGiwLh8cnwTr4h/TJlh4aQmFeMuRwbp8
koYE6/qVY3Kw0K5HjTnflwbr8iN+e7DA9w7we04GC+3zVtONyIdbwbp6ZnsV
rPOPySDr5EeaZYH7COqBrZwsBmkDEvrXUpvM9Q3yU+rL+vr9qazT30OyqN9M
/UIKf6Z11NPt0bIuP22/ytx/cN4yRskC35+RbzPtssB9BnRpjixwn0E8yy+W
xYeaQvDvIKfM8+M67L9F5vkU+sYmyEL7PHQc+R7jknX1ZOkFmesH/BF/QxbT
g1SPwZ9102Thu8v1bZt0xNvzQhb4HgH6oHeywP9PcF5NkpXvB9AnMsCqq5cx
Za1iWZejS7schb8yqlm5Xy3E/vWsunyt28zK/RH2Osiq05e6WXX+cPfR022D
/7X/SKvQwrUU/pg50cr5gfMVMdvK+bQE9XmRVeD/LciHQWus7E8+b3F6fcP2
WnkewPpvjlvF92p7qYp4us5bOd8Q7/jk/7dvEeL9wMr1aDnse2Fl/8Kfg3Ks
PL+ugL9LrVzPkR+x/iFcj2B/7Ach3F+hj7tKCOcb8l3+KESXvxFNQ/j+C7qz
VQjf7yDP0T5EZ6+9WwjPD2vD/w9FWJqT
       "]]}, {}}, {}}, {{{}, {}, 
     {RGBColor[0, 1, 0], AbsoluteThickness[1.6], Opacity[1.], 
      LineBox[CompressedData["
1:eJwVxXk81OseAGAjslXWn8onRYQkSQspvu+rVV3ZxnJSqWQJJUUiCansWyjj
VDOYkzVryl62QjrMmMloxBhGYxCtQnXv/eP5PJpn/O09xMXExOL+5/9Tnu7l
MlaGw4JNJLlU4RMk64exXlFcUfeaM5ojd6dB+hKbHk/xRfZPbuS+OzANZ72C
yziVgei6WGh7qeQ0tGYsSTpPuYace9buP9Y1BUojr55GoEh0wJiIq8iYAsuf
iXmdldGI6RiYlug+BTm6alEnKfEoNkNVuFZqChgWwxfzlyejvZRfRxffTwJp
E3NLCEpFEe71VrcqJmGrZdbalsp09JwnOdzrPgmpFzcsOlGyUSZ50qqYKQL9
sJgvCw4PUEtflsdguQia74gmqMsfoeHTS/t6UkQQ8m+/XxCiocc+jcFdtiIo
EDx0barMQ3FyZdlf3k2ADLFplwOlCIW/6I8QLAqBTeFWbQguRrqXJdUt+ULI
0UgymnMoQR28ZtWvHUIwM5jVfbC8FB18l0KyuS+EpzTX+MuoHPn64s4MUyGM
PdcMbaisQv4nayOibn2E/eMlznaUOnTHN37wyIFxiNK+rCahVI/GPJ6bmxiP
w4vTpoPVsfVoKmzDr6Nrx2EPt/nMmpAG5GtloSz2QwDGve/Ojzs3IcH+Qopd
oQBSBsWaG+NeooS/ZULlVwkg/JV+P/lQG+J83RUjkBsDdc/EXYbRbShg3WKy
6uIo1EvMUKRetKGYrNEXpyZHYR4/PVFr0o78klVNLbtHIage+Ot0XyE9W4/1
Rimj4FdOnp6Q7ECxUwXyl9VG4Vh2uERkyxvU84ye2mDBh55rwcruC2+Q2B4z
vyhjPuw/fnH9/m3dyIetKXTS4YOR+hkkk9uNKjpKjAxX8EHq0f6w1Ki3yDhi
6cfUDyNwzG7pfI9GD0La6a7yUSOw1LE7gDfUixb1rtpIMXmA26xCGAu9yOBD
u0nEax6E7WiPaFnJQCcc8iclGnkwSzQl020YKPLPxuNbC3jAZZeVnGtioM2C
Ry3KETyodEkXzj5kos8VV7eLtvDg1HHX0+InWeiojrS1071haJq8tMorhIXc
t+qVWicNw9rrcf92pbMQOTVY/OitYeA+qDHP6GIhp886cO7yMLgMrVTT28VG
REKMr7TtMNie6WNYq7xD2heChVzZYUDe1vuyOvvRSFZ6KGn5EGgEgq6RCRdp
n7tg4KgzCIRWGoyTuUi0eqNzo+ogyDJGnR9e4iL177/e7pAahK9b4mKWPeGi
6yrptjYfufBa1Cf8qD2I3Ak/W/0iLvi7+xTTlD4gMy3D6AvbuNBon7FVeXoI
zetoFxdav4cn97+pX2PwkL3ifP4+OgceRkSzXIZ5aG5gg2NsFgeSvJUTd07z
UFtCBYedyIELplsXZ2VGEJ380DLhCge29PsNeOMR9CM58IrbIQ6UrRzNdCob
QfZhmVUPp/qhIpMhb5zER6b1a/6ysOiHZ+mlJKHVGEr5Xfpa4zsbPstxhZ9c
xtA/xeddo0RsMLwpzfjuNYYaHU4zRMNsyAs4nSNxewwVTfdYsbvYkHJUea9G
8xhKKDTyk85hg7d0cLSzmQAZEq2qAzZsUAuzkGrXH0f0x3k+82UsCHfvXpYr
J0QZZS2NKXf64M1OGzlm3SSaISzvzdxkQMtdyuwB1Rl0+NaumnxBD4QHQUDn
l1l0wq90Jrr1LXzyyDxxt/wL8tEMXeQceQN5Lo/23vP8hppwrf9v3U54tv2Y
+Uv0A5nrBnh8Wv0aIta9yjVamEPiyy50lnu0Q/6XMfX2gXlUkBSqkdfUCiqd
1amZ5YtoPLi1M9K6BXaU7rpU7P0bxfozky6pNsN7C5NtgevF8Cb7O6+Cx17A
lZJCfpUYCXPo8wXT7U3wUuHHg5hZEr7iyVN62dkAhkFrWD8HxbHCEH9ht2Q9
fBumNCfWLsFeh5L5pKha8MOfa6oKJDC7d/XXUbEasCjI8fodI4l/r3qp5l/9
DIyVDNLG3JfiTb0lSaNx1cDyT2p3s5PCA3dDAyNPPgVmn1X5oqE0Xm5/s/n7
sSqIMPxAN1gng/9EH+fIO1WCTeyRlfOyslihIDs30bsCQkSKMCGQxYKD+jIE
pRzsLcsvnmfJ4QRSeKtKRxncpha4KFctwwkduVr1SmXA/RPa4JS0HPtQfPs6
WE+A57DBYPO1FThF/EjgxI0SwKV6djou8lhbVU9zO7kY8m+II46WAj61pyYo
fn0RnNj0oKLsrgLm69ndeUEUQq5zHt+JpIgvbC7+K3NNAaDf97IOXFXEzu21
ZD31fIjXe154cFwR22afekPf/Rg2d7eiNDclbE/K+gHkf+DUZ/OMIpYSpgRc
5ZhdpwPO5u9j71XG31NSmTWNeRDSGBRyuE4ZXysP2eg2nwtuHttlevRVsKsn
M+bXkVxgJ7g5a99Xwc6H7cgD+TmQZxis37yCwEt8ioZkxHJAg1znEnCdwMwg
tYnKczRYPGp21+0Ggb1GXau1vGjAsarpto4k8H/M1STSz9IgDZ5Z6t8i8Ozb
MK0rbjSQ3FRpwE8gcA0IziNHGkyQisQc/ybwjfVcxSlEg6pSSr5pHYGTKCkP
6KtokFK4mq/TQOD3V3eTN6jS4Dz9vjrRRGBVk2936Mo00MnOTJttJnDUtKzn
4xU0yLqdFlbYSeDugz/nyiRoEH4iznbNAIFV6AOu72eo4OoiEy/LJbAb1ZF5
ZpoKpg4xbXODBBak1rVNiKgwe+i2GYtH4OoVL9UWBVQ4uz1KO0lI4El18Sjt
QSqgLSS3MBGBH2tpd5cOUEFdPyLLZ4rAh7u00nb3U4G9LnzFwVkCW5rvjCUz
qVCp9uvQji8ExvuW1vF6qJBChN3U+kbgME9DT/+3VPBTWGhQ/EFgn1OJcb+6
qGAlFzr3Z47AMfMkvYQOKvwXt58unw==
       "]]}}, {}}, 
   StyleBox[
    InsetBox["\<\"\\!\\(\\*SuperscriptBox[\\(R\\), \\(2\\)]\\) = \
0.995026\"\>", {120128., 0.3}, {-1, -1}],
    StripOnInput->False,
    FontSize->18], InsetBox[
    StyleBox[
     TagBox[GridBox[{
        {"\<\"\"\>", "\<\"Estimate\"\>", "\<\"Standard Error\"\>", "\<\"t\
\[Hyphen]Statistic\"\>", "\<\"P\[Hyphen]Value\"\>"},
        {"A", "0.9708050217888629`", "0.007202516180110475`", 
         "134.78692688948215`", 
         "6.71635061165177811456646520950283721278875459572`12.\
974110528526314*^-357"},
        {"T1", "35530.638238597225`", "598.7645492523545`", 
         "59.33991630426759`", "1.1759812913429523`*^-210"},
        {"T2", "283216.9011789009`", "12557.719057214435`", 
         "22.553212083224`", "3.682071647116257`*^-75"}
       },
       AutoDelete->False,
       GridBoxAlignment->{"Columns" -> {{Left}}, "Rows" -> {{Automatic}}},
       GridBoxDividers->{
        "ColumnsIndexed" -> {2 -> GrayLevel[0.7]}, 
         "RowsIndexed" -> {2 -> GrayLevel[0.7]}},
       GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}},
       GridBoxSpacings->{
        "ColumnsIndexed" -> {2 -> 1}, "RowsIndexed" -> {2 -> 0.75}}],
      "Grid"], "DialogStyle",
     StripOnInput->False], {120128., 0.5}, Left]},
  AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
  Axes->{True, True},
  AxesLabel->{None, None},
  AxesOrigin->{0, 0},
  DisplayFunction->Identity,
  Frame->True,
  FrameLabel->{
    FormBox[
     StyleBox["\"2\[Tau] (ns)\"", 
      GrayLevel[0], 24, StripOnInput -> False], TraditionalForm], 
    FormBox[
     StyleBox["\"Echo Intensity (arb. un.)\"", 
      GrayLevel[0], 24, StripOnInput -> False], TraditionalForm]},
  FrameStyle->Directive[
    Thickness[0.003]],
  FrameTicks->{{Automatic, Automatic}, {Automatic, Automatic}},
  GridLines->{None, None},
  GridLinesStyle->Directive[
    GrayLevel[0.5, 0.4]],
  ImagePadding->All,
  ImageSize->750,
  LabelStyle->Directive[18],
  Method->{"CoordinatesToolOptions" -> {"DisplayFunction" -> ({
        (Part[{{Identity, Identity}, {Identity, Identity}}, 1, 2][#]& )[
         Part[#, 1]], 
        (Part[{{Identity, Identity}, {Identity, Identity}}, 2, 2][#]& )[
         Part[#, 2]]}& ), "CopiedValueFunction" -> ({
        (Part[{{Identity, Identity}, {Identity, Identity}}, 1, 2][#]& )[
         Part[#, 1]], 
        (Part[{{Identity, Identity}, {Identity, Identity}}, 2, 2][#]& )[
         Part[#, 2]]}& )}},
  PlotLabel->FormBox[
    StyleBox[
     InterpretationBox[
      Cell[
       BoxData[
        FormBox["\"680 ns\"", TextForm]], "InlineText"], 
      Text["680 ns"]], 
     GrayLevel[0], 24, StripOnInput -> False], TraditionalForm],
  PlotRange->{{0, 300320.}, {-0.02, 1.02}},
  PlotRangeClipping->True,
  PlotRangePadding->{{0, 
     Scaled[0.02]}, {0, 0}},
  Ticks->{Automatic, Automatic}]], "Print",
 CellChangeTimes->{
  3.777785321234124*^9, 3.7777853707808514`*^9, 3.77779478244925*^9, 
   3.7777948190579433`*^9, 3.7777957670511417`*^9, {3.7777958131528883`*^9, 
   3.777795843998119*^9}, 3.777795884855309*^9, 3.777813113794306*^9, {
   3.777813197419619*^9, 3.777813214614976*^9}, {3.7778157437027316`*^9, 
   3.777815800875432*^9}, 3.7815040533234453`*^9}],

Cell[BoxData[
 GraphicsBox[{{{}, {{}, 
     {RGBColor[0.368417, 0.506779, 0.709798], PointSize[0.007333333333333334],
       AbsoluteThickness[1.6], PointBox[CompressedData["
1:eJxdWHl8jNca/mYymUwyk2T2uaWtQdVVS3NR1duq96CUquZqFU3pVFGKCkqt
7ad0iSoRIdSSsdaS6iBqLYPYGktiTQjGTgSTfU/ud7737f31XP/E8zvnvOvz
Lt80HjK27zCtJEm/aySJ/1X/BVcC/aez+iewDoI712Yl5j5E/GYavP/v1F3H
TuQjHrAVJlR89VZE5APEc9Nh5+BrvWPr7yP274Sr+sF7391yl+TtgbbVETFJ
jQjb98P3T7iCO4jX+uHKivEXvt1I+PVD8HZsfZ5+8C3EOYfBMuq97O1nbyAe
cQR6dOxw6kY1Ye0xWN0t7T9vnLmJePlxuPO9dWt3B513+BN8UtPKVd0CiI9m
Qv3uyH2TfiHsOQUZ5XF9RxwnXHUa9sbs+EeB4TriXlnwZtyLY5/fQNiVDd9t
POLp0fEa4tvZsDv/0PkhviuI085CzuPkzW16X0U85Ry8dc9W3nEg3e9+HhJe
2nR/4IM8xLYL8O6PB+fFj75M8boAsHPmpcfJJG/DRUhr07u1/lU6n3gJ6hbb
G7StJtwlBy5uWP3puuJcxNG5UH2vQ/DyCjrPywUlGXtiduRQvC/D8vD81Ct+
kj/uCmwbGXV9bE96/3oejHx455Su9BJi41XKH8nLuQrJw14zrP2Vzr3XYIqZ
R+gi4jHXoc/iQnfi74SfCcChrVwBypdnBcB7xT/qyz8v4Hl+ABTnlCt0v88N
eDDwwfSbz6J8Of0GRGu5RefxvOFN4GzL0+N9eeZNSF10uvnjcWfx/P5NyJzM
DSL7et+CGzntFcrhe3nbLdjE09eB9D91G7oO/0jTvegcnn99GzjbKjPo/O5t
MKkJIv297sBGHu4Euu+7A11VAaTfdReSamKbXNyAWJ5xF2bD5alT2mUTX+7C
qsbbf5OaIpZ73YOqjE5KyLIQb7kHj/pwRpE8x33KH51Puw9RCns/nEjvr9+n
/ND97g8gt71aYXie9gCmqgVM+m35sPvYibbP6si+KfnwjkrgLOJfPsx6hkfs
DOJuD2Htrykv284jljc9BDVdUXRuKQCluHgB4vmXBaL+KwXwTRUn5CnE3R7B
/utJXboOp/sbHsEfS711uyNPEn8fg02p3k4t6f7Ex9DK/+ZX/7RkEp8fQ9aY
wI5X7/yJGJ5A5+QflIo6gffXP4FGzTkD8L6sDwry/a8Eqb5I3pggXMpcplQE
4dQgxRPly+eCcFip7qZPk7zQQsE+f8dCSOHlGIH++j8rhOnLW91ibjyH1EJo
NuSnF6a+j/IguxCW3Q3WLraTfF0R8Qnl+18uAiU3FzOXoT/SqCKYmV5aNPwb
er+yiPoZ+iNnF0HeraFPRWvJ/5BiOKNUw7a5x1Beh2KQPw/57WoLxNJnxbCY
l8s2ivfyYnhWLRA8l7OKQVUfTvZpS0R97UugqZrwI/h+ZAnk8XLuh+9heQnU
cvqvJny6hPrlUXyvKRXi6W9fCoNVgpO8EaUwcM2clYtO0/tlpXC+M09YBr4/
XUr1cQixVCbYI7ctgya8vCoPovxhZXBaV3pmTIDkLy2DA82+/e7kfnp/qgwM
KsFRPtSVUT8/jO/blkPDyapGxEPLYeDRWUpFY7xhaTks+cA0afYneB8yy4Fn
+9+px1F+nfhejqmAz/6VY5n3Nt6XhlVArJpAPIclFTD7k3NP779O+k5WwI8r
eYMjf+oqoCRhmsIwwjGVwL3RzkX7paGVoLq/ivxJqQSDSiCUJx2vpPon+bWV
oLbrwfsRv1gFJWlfvD5uPtn3SRXNpz2IF1XBEqUbdN6J+uF4lehftYL7cQlk
X5tqWKdsE/1lwp5qGFrm8DzXmexNrhbyCceqQSGTa70T9ctV1bCLryP9/fi+
dQ31F8TSxzXwjNpQkF+QXAM8G0oEER+tEfIrV9bAlHasdkLDXSivVS08askb
DNk3uBZOLlMHJL5fWAt2ZXofnUX4SC20adFecQGxXFFL8+IPxC/UAa++sJnp
KG9QHajtYAyeQ1KdkC/IqBPy46+oAzT/AMprUU/7wj70d3A91c9exIn14v2M
eiF/clk9zQv0L2CX2M+8He77Hc/bSGzc6J8Pl8dtQ9xDYnz6Ns+k+HwsMWXZ
WzojlPBUiYXyctqB+j3JEitTulPVPZQnbZHYaDWBiL3HJPZ3/ngDEuv7xple
92w7EVdKrKY1D+gOjIdNw7I5XRagv3JrDVOcVVomxs/dQ8NwvyPs0bBP1QGD
8v1TNAz3V5TvWahhI44XKBlGPnjSNKL+oxr29/h6r2vYlhSV4IgrNIL9YNWy
iUp0Fw7D+4GWWob9C+13d9cy7O943/2RluG+vBv1T9Eyld6zfkWcpBXiKaVp
2YloPjHwvSdDy17oP0hpMRTPa1oWwdk5iuwr17KkRr0yGvRDvgUsIewldfwi
P92tQth4lY47aP6GsI7cu5n4Xh4UwgbIC5SNBeX7vwxhyjKuNGzMt2dBiJAf
aXMI66lM41HvbcXzwyECX+BaiBjfshCmrm86yq9Zx7A/7qJ60bG/81nuqmPD
+XqZspPqRyfwyT9Jx9RyhE2I5+sY9t/taM9GHSvmdOzgQ3sP61jLFe8oHXYj
nl/RsXOVfOFC+72lOobzheIXHcpwP6V4tQjlzYJ3OMRdQoV8uD8MZTz6JWn4
3jMplOG8JfvnhbLCWr6wU71sCGVq+LLRXu+hUIbfT2kYn7xQ1i1hgDIBKV6l
oWzRZv4BgO8DUXo2P54X7GbEzfWsh7KNrHgH37u76Bnu57+g/jg9Sz/LHab6
nKRnTdQPBtQvzdcznN9UL7/oqX7wvfegXoi397Ke7eGfTx+SfSV6NoOnfzLG
OxAZxtRutw/jDc+HMZx3qE+GMPa0WiAUr7gwhvsnvvdPCGP4vYn9yD/3//C6
MHZK6Z63v0cs+cMYzhvKZ26YEG8oDmMYbrwPJoNoz/MGwV83GIR+6B9oYEVd
eUK2oL0TDIK9nrkGht+TGH9pvYEZY3hFUrwOGCj+6xHnGBh+H6E8KDIIfJVN
4cS/dYibhQv3A53CGWdX/0EbUP/AcMEeaUI4w32Y+L42XKgPaX84w/39N7Tn
kigfCsOpHpFf3vAIhvvIarTnuQjqB2Rfpwjqd1SP/SOo3hIQx0cI/HYnRDD+
tdU1gexfEyH4498bwdqpCzDqh0sRDL8fsF9CMELIZyDcSPNpCeImRraGr9PT
UJ/8mpHqieztZ6R+/jPiz42Md//pNym/CUamfm6MQn5Ka4xs0MSPFcqswvO9
RrEeLhiF/gBPjEK+AwYT9VfEchOT4L/7NZPgn7ufiS3g46/Gi/rGmhj/uOp1
bw3ak2Bi6s8jexF7V5uE+pf2mhjuM1gP0nkTa6xsd9d6Iz/gsYnmJdrvDo+k
c9TnbxJJ/Yvq4dVIFqcuVJS/9yLFfWFaJM0Tup8aSfnEfHj3RFL/Jv6fi2Sb
jTwD1C8eie8D+iiBv7I7SpiX7j5RxMcktHd0FNOoHwCUn++iyD7kq+QV38Oe
KIEP3rNRNC8pPgVRVL/Ij0BoNNUPxltuFM3w+5L678vRQr27+0YL/dkzLlqo
Z/eSaOLXWrRvV7RgX+BGtOB/fJiZ+iXe97jMZC/mK7Gp+S/+H1Dj8aKZ4X6N
92O6mJmDf57GYDx8fcxifOPMAr9iR5jZkU5qR0B7J5qF+gzONLOHvNs0RT54
5ov2xaaaBf4Gt5uF/EqHzExZRpWCQnnyaTNTmrmy0GF8AnfNTA1nA8RSiZlN
Uxf2ZRgPjYWp9OyP8QpGWhjuu2i/uaGF+s9SzGdzi/De3P4vjPmRmYXd5z+X
jUd9wT4WhuvcZDWe7jiLmP8Jor6gbKF8YLz8P1mE+GetE/XHpFuoPpGvWcct
NC/R3tgLFmF+J+ZbRP5IVqEfyVFWIX/BZlbBH6m9VeB7PLMKfEgcYKV9DuX5
hlkF/THjrUwdv23nobyvrWwILnBof6KV+sNyjO96K8PvLfQ/Pt1K+xXiwEEr
8fUH9DfXKuTfVyDKD2ht1O/JXotNqD9fU5sQT09b8Tzwuo3qawXa39smyJcH
2GievaHmOzjMJvLhK5vIv0U2of5i1tiYGs4klBfcY2P4fYrn8dk2gQ/eqzaq
l9mIC2wUn2TMb6WN5sdi5K/RLvTPxAZ24if2V19zu5AvXwfxfuxbdsEf/xC7
4I9/nCgvOMNO9U/2z7FTfueiPcvtgr+JPjvNa5K3z07+faHGM/GEneYr8icr
1y7EL1Bop/0B+62nzk78xP4eb3KI/GrsoH47B/PXziH0C19Ph8A/+MjB8PcH
5EfsGIfQf2CGQ+CfP8HBnkMHML8pDqFevBsdQnx9+xwUj/loX6ZD6O9ZOQ5h
3vseOIR4xNc4BH7GG53UXxaiPpdT4Cu0chJfF+H9jk5Bn+9tJ8PfJ1FezAdO
2s+xP2V97hTyDdOdYr+Y76T9mvY9r5P6PcZfTndSPBdg/g85hX3Bn+OkfXkl
6g86hfkQrHVSveJ7r8nFsH3iPDI3chGfU5AfLV2CP8FXXML8D/QUz81xLtKH
9RQ/0iXEyz3DJfTbxDkuMX4pLmGfNK93kf/If98Ol1Af5gyXWJ+XXf/bz/4L
EC9oXA==
       "]]}, {}}, {}}, {{{}, {}, 
     {RGBColor[0, 1, 0], AbsoluteThickness[1.6], Opacity[1.], 
      LineBox[CompressedData["
1:eJwVjnk41PkfwCmrXBX6JkopRWEVsmE37/cnq2t/ESmeril3ohxZt1RqHUVJ
1LRMQpmh0DgSIkTrKIaRY5xjjDEkSRTV7u+P1/P66/U8r3WO52xdFkhISNz9
j/+bXmjB46iEQ/aO1cwH+hMQrxPKraMfRSWaVnxl8ntY7NueGUs/g5xZ7ziR
2XtwdgvI62SfR/FHsixhbBxqbi+M86KHoK5hn8HNh+OgNFhXGIEXUd5Vqn6f
6zjs/HI9o54diVpZnyxtdcbhgbbapRP0WOxxb6+SLhsDjnm/d5ZCPL6HkWJW
1BhI6rZuCcKbuBin5o/Zj4HBzrtrqtmJeMpKyX3mixhuem+cP0y/hxbL38Ze
tRaDTmjU1NzBFPRasPQHS1sMVX+JR+8rMDAi+R2rQkIMQW87PP0xDQ8EGGYH
F44Cczj1aAU7A5n+XZqd2qMgQ+maHqRn49pkGYvUTSJop/MKNgbk4N98xWu9
siJ4oBG3dfbgY7Tyv9EZPT4CZnqT2ikKuQiLTwYpFYxAYdrRWD/Mx7SqmKE4
yxEQPFsXXM4uwBVOKeyuACE0hHwt1lpfiArQsOo0TQj55q3T8TcK8ULA/iTT
3UIIq4n0cfQqQu/PZcfpKkKgmoXui7SfoSebpW5YOgyWwsf2NvRSHE6xk2XI
D8OlDX5qUkpluEv14uaxaQFUnjLpKYouw1vLOqS9+wTwG6/KcXVQOXrrDiaq
sAVg2PLOS2hfgb3WfvjPMQHc6JGoehHzEk0c/7otfjYE4XU6HXZ7XuEt9ik7
lXg+qLteN9WPfIVN0+Yr0sP4UCb1gb6o8hUeOSHz1sqTD19J4fHn22sxO2zY
WWofH/zLgL9Wuw6Xa/x1hifNB898u/ejP/2D1XOns0RXBuHIvXCpi9WNOBt4
6dPm5AFoDglQdpprRMusWqOP0QNgecx7vaVRE2Yyhu2aQgdgq7ojyqQ3Ye7D
wdBSxwFYxLAMvXnpDfafjrf23TIAR2ykvzZrNGMCKz1Ps7EfpA81+Qz0teCa
PQK3y4r9QF7tDeLMteCimYWX7aX7IdS4NqJahYPqMUbufp/7YJKqiM+05uCh
+bRK6/o+4LXnPT5dwcGF5YG0A359wHZIFE2mtuISn9+ZWN8LJ48dPbXgBBff
/jp0MTimByrGfFe6BXExSIq6nhbQA2vCYt42JHIxPGA6r8e5B3gpJTtuN3Bx
rWUTMxF6wKFPRW2TaTt2H9u658s0Dw44tnH2L3+HYoPemjBXHqD7/t/v1ndg
ilbXt5hD3cCYdZ77JujAuQ20dUqW3fA9KvSpo2Qnzl85u4u1rRvKmNkaeiad
eIKloK2wvBtMxDLfXmR2Yud3KSt6axdsPVtbOBTRhfs5/FOlh7pA4zxob93O
Q6nqpfpnXTqB0kwAoR0PtxX9JmYe6gRZzpB9qi8Pz52JXffZshM+bYmJkn/C
Q2F64I0KrU54LW4TjWzoQfUpl0xlUQecc/LISVPqRbtwWjfLuwNe2N42UH7f
h0s3u2l9jHkHT+5Mq4dwBtBR4BvsLORCakQk16F/AAuTHIIGu7kQ5658/Zf3
A1iHd1w9mrlw1sRgflJmEDdfk+pKLuHClg7PLncyiJzDcfVu17iQpzKUdDhv
EM2Tg/e2GHHhaRJnqWEcH30aF7GCo9ugODFXUrRXgF3RPR6D+1vhoxxPNOEg
wD+0Lxwqt2gF/cuLOZ/dBOh9P0F437QVMnxOPZC6KkC/VNWOixtb4YaVsoVG
1X/9pprXzG8ccF8cEGlvNowHprcrRudyQC3UfFGtjhCNWp05RJUD4U5N8uly
ItQI7vPOW9ACDR51jU5qIpT90CdI+NoMK31fXtuwWYSnd564F/KxGdgRhfIP
d4lQJl7+MW2wGUZSUuSZF0W43r4136eqGWw7vORzZ0SYHvU9sfhyM2zcv0S+
lD+K4wu1TRmyzdD4i7Vca+kYqv6S42Zq8waqb9End634gArCr/6+Hg0Q7g8+
9VOTOCwp7WFU8RomXJKO38qfQvfXf1uNpNRChgPDItl1Gv/3xTzB6E0NFG87
suMlzmBWsfOJRyurIWJtXfrWuVl8t+aVSgn7JWRNCdRru76imt7E+jRaJSyv
L7qZlD+Pn/90tT3i9wKMc019c9y/o2pD1pVrsWXQbb7d6Px6CaKq/Gyo7elz
+PMxi18gIUm+KYwF6GmXwMtlMylRk5JEcQtvwiyzGPT9V3O/9Cwgv35avavR
ugim++lV158vJOpy9Xtc9QvBk3wsKWBKET3vFw+dlhWAOfOB2/eonwirXkVl
92o2GCrpJQicpIlexh2b9/AUuOfiamk2i0ibTpFxkVM+tLbtzZ/XX0wUi8vc
xJl5EKHfm6m3VobsC/H/MfwmF6yj/1D5KitLek+09J45/wSCxIowOixL1pll
lf+6+zHY7sz39uLKEbO5msCNK3Lg6n2mg3KBPNFemsmky2UD70dw+eE4BWKQ
31HUQLFg4OBGvZ9DlhDnyLLGZjUmkNxNNloOS0nQlCBNzTwLsi4swE7NZcS4
0uam4bFHcFw35WnerWWkMifow7PEh5Bun8E/LKlIuGFRHxZ2ZwJ+T767K1CR
1B7LWFGyKhNiNz1j7RYqkirpPdIzPhnwc1MNJtCUyH3N89UtVelw8uOO29lc
JaLwW6vPqrXpQO7xf2+3UCZaaoEHjK8/gKAX/kH7SpWJxUTttGg6DWgu22Sa
dZaTcPNIxcKzadB+jWa/4c5ykllgYu87cR8y9AN0qpZQ5NG8aueox33QsCt1
8AmjyJPZJ+o7Rxgwb2V2i3aBIt66M3UGQwzo3FvStP8iRfa1Oa5f38+ABCje
qXOFIkouwmGpDgb8pMvW41+jSGRGGJNTx4BRyWyJQ39TpC+HJ457xICCXHqW
SSlFdA+qrYt2Y8ANlipfq5wiOe43/eOcGOCVeUedqqCIxYjL+UQaA7TuJSVM
VlGEtsrP+4E9A+5eTQhl1VNEg298vHY3A8KPxxxY3UWR7g+2gz9vYsBRB5lY
WR5F5J9n1+3YwACTg1GvZnsoEpx7185KgwGTe66acQcooul1xdlnJQOct13a
ECeiSLgSx75iMQNwiyQtVEyRXRky/m1SDFDXibjrMU6RCyWBJqMSDGhfG75k
9yRFKJ51vsqXVGCrfdtjPEURj32nXLdMp8INKvSy5jRFVL7PV+6eTAXPZXPl
ijMUud0yU3lyPBX2ygXP/pj97y9PyzVYlAr/AoXPqM8=
       "]]}}, {}}, 
   StyleBox[
    InsetBox["\<\"\\!\\(\\*SuperscriptBox[\\(R\\), \\(2\\)]\\) = \
0.989976\"\>", {156328., 0.3}, {-1, -1}],
    StripOnInput->False,
    FontSize->18], InsetBox[
    StyleBox[
     TagBox[GridBox[{
        {"\<\"\"\>", "\<\"Estimate\"\>", "\<\"Standard Error\"\>", "\<\"t\
\[Hyphen]Statistic\"\>", "\<\"P\[Hyphen]Value\"\>"},
        {"A", "0.9744649629052106`", "0.01025646786427858`", 
         "95.00980023533205`", "4.887843041064251`*^-293"},
        {"T1", "27150.125945085914`", "571.9215764716866`", 
         "47.471763720790484`", "3.7252674964038995`*^-174"},
        {"T2", "290598.1437019126`", "11315.64328405906`", 
         "25.68109796385093`", "3.4052834378847104`*^-89"}
       },
       AutoDelete->False,
       GridBoxAlignment->{"Columns" -> {{Left}}, "Rows" -> {{Automatic}}},
       GridBoxDividers->{
        "ColumnsIndexed" -> {2 -> GrayLevel[0.7]}, 
         "RowsIndexed" -> {2 -> GrayLevel[0.7]}},
       GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}},
       GridBoxSpacings->{
        "ColumnsIndexed" -> {2 -> 1}, "RowsIndexed" -> {2 -> 0.75}}],
      "Grid"], "DialogStyle",
     StripOnInput->False], {156328., 0.5}, Left]},
  AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
  Axes->{True, True},
  AxesLabel->{None, None},
  AxesOrigin->{0, 0},
  DisplayFunction->Identity,
  Frame->True,
  FrameLabel->{
    FormBox[
     StyleBox["\"2\[Tau] (ns)\"", 
      GrayLevel[0], 24, StripOnInput -> False], TraditionalForm], 
    FormBox[
     StyleBox["\"Echo Intensity (arb. un.)\"", 
      GrayLevel[0], 24, StripOnInput -> False], TraditionalForm]},
  FrameStyle->Directive[
    Thickness[0.003]],
  FrameTicks->{{Automatic, Automatic}, {Automatic, Automatic}},
  GridLines->{None, None},
  GridLinesStyle->Directive[
    GrayLevel[0.5, 0.4]],
  ImagePadding->All,
  ImageSize->750,
  LabelStyle->Directive[18],
  Method->{"CoordinatesToolOptions" -> {"DisplayFunction" -> ({
        (Part[{{Identity, Identity}, {Identity, Identity}}, 1, 2][#]& )[
         Part[#, 1]], 
        (Part[{{Identity, Identity}, {Identity, Identity}}, 2, 2][#]& )[
         Part[#, 2]]}& ), "CopiedValueFunction" -> ({
        (Part[{{Identity, Identity}, {Identity, Identity}}, 1, 2][#]& )[
         Part[#, 1]], 
        (Part[{{Identity, Identity}, {Identity, Identity}}, 2, 2][#]& )[
         Part[#, 2]]}& )}},
  PlotLabel->FormBox[
    StyleBox[
     InterpretationBox[
      Cell[
       BoxData[
        FormBox["\"816 ns\"", TextForm]], "InlineText"], 
      Text["816 ns"]], 
     GrayLevel[0], 24, StripOnInput -> False], TraditionalForm],
  PlotRange->{{0, 390820.}, {-0.02, 1.02}},
  PlotRangeClipping->True,
  PlotRangePadding->{{0, 
     Scaled[0.02]}, {0, 0}},
  Ticks->{Automatic, Automatic}]], "Print",
 CellChangeTimes->{
  3.777785321234124*^9, 3.7777853707808514`*^9, 3.77779478244925*^9, 
   3.7777948190579433`*^9, 3.7777957670511417`*^9, {3.7777958131528883`*^9, 
   3.777795843998119*^9}, 3.777795884855309*^9, 3.777813113794306*^9, {
   3.777813197419619*^9, 3.777813214614976*^9}, {3.7778157437027316`*^9, 
   3.777815800875432*^9}, 3.781504053615999*^9}]
}, Open  ]]
}, Open  ]]
}, Open  ]]
}, Open  ]]
},
WindowSize->{1920, 997},
WindowMargins->{{1912, Automatic}, {Automatic, -8}},
FrontEndVersion->"10.4 for Microsoft Windows (64-bit) (April 11, 2016)",
StyleDefinitions->"Default.nb"
]
(* End of Notebook Content *)

(* Internal cache information *)
(*CellTagsOutline
CellTagsIndex->{}
*)
(*CellTagsIndex
CellTagsIndex->{}
*)
(*NotebookFileOutline
Notebook[{
Cell[CellGroupData[{
Cell[580, 22, 99, 1, 101, "Title"],
Cell[682, 25, 106, 1, 101, "Title"],
Cell[791, 28, 232, 4, 30, "Text"],
Cell[CellGroupData[{
Cell[1048, 36, 100, 1, 70, "Section"],
Cell[CellGroupData[{
Cell[1173, 41, 1305, 32, 75, "Input"],
Cell[2481, 75, 430, 6, 31, "Output"],
Cell[2914, 83, 430, 6, 31, "Output"]
}, Open  ]]
}, Open  ]],
Cell[CellGroupData[{
Cell[3393, 95, 99, 1, 70, "Section"],
Cell[CellGroupData[{
Cell[3517, 100, 583, 12, 52, "Input"],
Cell[4103, 114, 1088, 17, 72, "Output"]
}, Open  ]]
}, Open  ]],
Cell[CellGroupData[{
Cell[5240, 137, 90, 1, 70, "Section"],
Cell[CellGroupData[{
Cell[5355, 142, 6761, 156, 609, "Input"],
Cell[CellGroupData[{
Cell[12141, 302, 11469, 215, 522, "Print"],
Cell[23613, 519, 11715, 220, 512, "Print"],
Cell[35331, 741, 11396, 214, 522, "Print"]
}, Open  ]]
}, Open  ]]
}, Open  ]]
}, Open  ]]
}
]
*)

