oscilloST(wave1, wave2 = FALSE, f, from = FALSE, to = FALSE, env = FALSE,
smooth = NULL, ksmooth = NULL, identify = FALSE, plot = TRUE, colwave1 = "black",
colwave2 = "blue", colbg = "white", coltitle = "black",
collab = "black", cexlab = 1, fontlab = 1, colaxis = "black",
coly01 = "grey47", coly02 = "black", title = FALSE,
bty = "l")
Sample
object generated loading a wav file
with loadSample
(package Sample
object generated loading a wav file
with loadSample
(package wave1
and wave1
(in Hz).
Does not need to be specified if wave1
and/or wave2
are/is (a)
Sample
object(s).TRUE
plots the envelope of the time wave instead
(by default FALSE
).env
is TRUE
then smoothes the envelope
by floating average.env
is TRUE
then smoothes the envelope
by applying a kernel
smoothing.TRUE
returns an oscillographic or envelope plot
of wave
(by default TRUE
).wave1
.wave2
.title
is TRUE
, colour of the title.wave1
.wave1
.TRUE
plots the title
with information on time and f
(by default FALSE
).plot
is FALSE
.
identify
returns a numeric object with the time coordinate
of points successively chosen on the bottom oscillogram.oscillo
a<-synth(f=8000,d=1,cf=2000,am=c(50,10),plot=FALSE)
b<-synth(f=8000,d=1,cf=1000,fm=c(0,0,2000),plot=FALSE)
oscilloST(a,b,f=8000)
Run the code above in your browser using DataLab