In[]:=
data=toplot2//Cases[#,{x_,y_}/;x>10]&//N;​​%//Length​​%%//ListLinePlot[#,MeshFull,MeshStyleRed]&
Out[]=
977
Out[]=