Partially smooth the line graph with geom_xspline()

Question

I have the following data:

> dput(material)
structure(list(strain = c(-0.00496, -0.00375, -0.00248, -0.00195, 
-0.00121, -0.000248, 0, 0.000132, 0.00145, -