n = 5 (slider from 1 to 5, step 1)
P_{2} = (0, 0)
P_{0} = (-0.09654224154906399, 1.3072972395062468)
P_{1} = (-0.28968987578950045, -0.46395733608835743)
P_3 = (0, 0)
P_4 = (0, 0)
L_{p}: {P_{0}, P_{1}, P_{2}, P_3, P_4}
L_{c} = Sequence(conjugate(Element[L_{p}, i]), i, 1, Length[L_{p}])
L_{f} = Sequence(If[imaginary(Element[L_{p}, i]) ≟ 0, ℯ^((real(Element[L_{p}, i]) * x)), (sin((imaginary(Element[L_{p}, i]) * x)) * ℯ^((real(Element[L_{p}, i]) * x)))], i, 1, n)
f = Sum(L_{f})