epggs                  package:emu                  R Documentation

_P_l_o_t _a _g_r_e_y-_s_c_a_l_e _i_m_a_g_e _o_f _p_a_l_a_t_o_g_r_a_p_h_i_c _d_a_t_a.

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

     The function plots a grey-scale image of palatographic data such
     that the greyness in cell r, c is in proportion to the frequency
     of contacts in cells of row r and columns c of all palatograms in
     the object passed to this function.

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

     epggs (epgdata, gscale = 100, gridlines = TRUE, gridcol = "gray", 
         gridlty = 1, axes = TRUE, xlab = "", ylab = "", ...)  

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

 epgdata: An eight-columned EPG-compressed trackdata object, or an
          eight columned matrix of EPG-compressed trackdata, or a 3D
          palatographic array that is the output of palate() 

  gscale: a single valued numeric vector that defines the granularity
          of the greyscale. Defaults to 100.  

gridlines: if T (default) grid lines over the palatographic image are
          drawn are drawn. 

 gridlty: A single-valued numeric vector that defines the linetype for
          plotting the grid. 

 gridcol: color of grid 

    axes: T for show axes, F for no axes

    xlab: A character vector for the x-axis label.  

    ylab: A character vector for the y-axis label.  

     ...: graphical parameters can be given as arguments to 'epggs'. 

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

     The function plots a grey-scale image of up to  62 values 
     arranged over an 8 x 8 grid with columns 1 and 8 unfilled for row
     1.  If cell row r column c is contacted for all  palatograms in
     the object that is passed to this function, the corresponding cell
     is black; if none of of the cells in row r column c are contacted,
     then the cell is white (unfilled).

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

     Jonathan Harrington

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

     'epgai' 'epgcog' 'epgplot' 'palate'

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

     # greyscale image across the first two segments 'just relax'
     # with title
     epggs(coutts.epg[1:2,], main="just relax")

     # as above but with dotted gridlines in blue
     epggs(coutts.epg[1:2,], main="just relax", gridlty=2, gridcol="blue")

     # as the first example, but with greyscale set to 2
     epggs(coutts.epg[1:2,], 2, main="just relax")

     # get palatograms for "S" from the polhom.epg database
     temp = polhom.l == "S"
     # greyscale image of all "S" segments at their temporal midpoint
     epggs(dcut(polhom.epg[temp,], 0.5, prop=TRUE))

     # greyscale image of all "S" segments from their onset to offset
     epggs(polhom.epg[temp,])

     # the same but derived from palates
     p <- palate(polhom.epg[temp,])
     epggs(p)

