# NOT RUN {
data(return)
x<-return[1,]
#default
med.height(x) ###for one peak waveform, it generally not make too much sense
xx<-return[182,]
med.height(xx) ##this can help to charcterize the waveform
# }
Run the code above in your browser using DataLab