The function allows you to measure the length of the waveform with intensity after excluding non-intensity parts.
Generally, we assumed the intensity of a waveform should be larger than 0.
Usage
wavelen(x)
Arguments
x
is the waveform intensities. If you have other information, you should delete these intensites before you run this function .
Value
return the the number of waveform intensities or waveform length.
# NOT RUN {data(return)
y<-cbind(1:nrow(return),return)
x<-return[1,]
wavelen(x)
#for x has index and intensities, we should delete non-intensities firstyy<-y[,-1]
xx<-yy[1,]
wavelen(xx)
# }