pastew                package:seewave                R Documentation

_P_a_s_t_e _a _t_i_m_e _w_a_v_e _t_o _a_n_o_t_h_e_r _o_n_e

_D_e_s_c_r_i_p_t_i_o_n:

     This function pastes a first time wave to a second one. The time
     wave to be  pasted, the time wave to be completed and the
     resulting time wave can be  displayed in a three-frame
     oscillographic plot.

_U_s_a_g_e:

     pastew(wave1, wave2, f, at = FALSE, plot = FALSE, marks = TRUE, ...)

_A_r_g_u_m_e_n_t_s:

   wave1: data describing the time wave to be pasted.

   wave2: data describing the time wave into which 'wave1' will be
          pasted.

       f: sampling frequency of both 'wave1' and 'wave2'.

      at: 'wave2' position in seconds where 'wave1' will be pasted into
          (by default at the end of 'wave2').

    plot: logical, if 'TRUE' returns an oscillographic plot of 
          'wave1', 'wave2' and 'wave1' + 'wave2' (by default 'FALSE').

   marks: logical, if 'TRUE' shows where 'wave1' has been pasted (by
          default 'TRUE').

     ...: other 'oscillo' graphical parameters.

_D_e_t_a_i_l_s:

     If 'plot' is 'TRUE' returns a two-frame plot with three waves:
       (1) the wave to be pasted ('wave1'),
      (2) the wave to be completed ('wave2'),
      (3) the resulting wave.

_V_a_l_u_e:

     A one-column matrix describing a wave with the same sampling
     frequency as original data.

_A_u_t_h_o_r(_s):

     Jrme Sueur jerome.sueur@ibaic.u-psud.fr

_S_e_e _A_l_s_o:

     'cutw', 'oscillo', 'timer'.

_E_x_a_m_p_l_e_s:

     data(tico)
     # double a data set describing a bird song
     a<-pastew(tico,tico,f=22050)
     oscillo(a,f=22050,k=1,j=1)
     # a direct way to see what has been pasted
     pastew(tico,tico,f=22050,plot=TRUE)
     # cut a section and then paste it at the beginning
     a<-cutw(tico, f=22050, from=0.5, to=0.9)
     pastew(a,tico,f=22050,plot=TRUE)
     # or paste it at the end
     pastew(tico,a,f=22050,plot=TRUE)
     # similar to
     pastew(a,tico,f=22050,at=nrow(tico)/22050,plot=TRUE)
     # or paste it at a specific location
     pastew(a,tico,f=22050,at=1.4,plot=TRUE)

