# Tag Info

You say your data is a list of $(X,Y)$ so it looks like this: ListLinePlot[data, Frame -> True, FrameLabel -> {"X", "Y"}] Far from been a random coil where the definition of persistent length makes sense. Let see, we want to calculate the average $\cos(\theta) = \hat{v_1} \cdot \hat{v_1}$, as a function of the contour distance, so I use Dot[v1, ...