Estimate zero crossing points of waveform.
zerocrossing(x, y)
the x-coordinates of points in the function.
the y-coordinates of points in the function.
Zero-crossing points
# NOT RUN {
x <- seq(0, 1, length.out = 100)
y <- runif(100) - 0.5
x0 <- zerocrossing(x, y)
plot(x, y, type ="l", xlab = "", ylab = "")
points(x0, rep(0, length(x0)), col = "red")
# }
Run the code above in your browser using DataLab