Period Code

data = load('Test 1, Trial 4')

tInterval = 3.2 * 10^-8;

%Bounds
a = 66000;
b = 73000;
c = 76000;
d = 82000;

%Index Values
firstIndex = 0;
secondIndex = 0;

%Variables used to store indexes
tempVal = 0;
currVal = 0;

for i = a:b %Finds the first value
    tempVal = data.A(i)
    if tempVal < currVal
        currVal = tempVal;
        firstIndex = i;
    end
end

currVal = 0;

for i = c:d
    tempVal = data.A(i)
    if tempVal > currVal
        currVal = data.A(i);
        secondIndex = i;
    end
end

plot(data.A)

period = 2 * (secondIndex - firstIndex) * tInterval
cTimeConst = 1/exp(1) * data.A(secondIndex)