cColor              package:geneplotter              R Documentation

_A _f_u_n_c_t_i_o_n _f_o_r _m_a_r_k_i_n_g _s_p_e_c_i_f_i_c _p_r_o_b_e_s _o_n _a _c_P_l_o_t.

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

     Given a set of probes, will highlight them in the color desired on
     a plot which has already been created via the function cPlot().

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

     cColor(probes, color, plotChroms, scale=c("relative","max"),glen=0.4)

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

  probes: The probes that are being highlighted.

   color: The color to highlight the probes.

plotChroms: An object of type 'chromLocation' which contains all the
          gene information to be plotted. 

   scale: Whether to plot the graph scaled absolutely or relative by
          chromosome.  Default is absolute.

    glen: The length of the gene line plotted

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

     It is important to call the function 'cPlot()' first.  This
     function will then search for the specific locations of the probes
     desired, which are contained within the 'plotChroms' instance of a
     'chromLocation' class.  It will then pass these on to the plotting
     routine to highlight the desired locations.  NOTE:  It is
     important that 'plotChroms', 'scale' and 'glen' parameters are the
     same as used for 'cPlot()'.

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

     Jeff Gentry

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

     'cPlot', 'chromLocation-class'

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

        ## A bit of a hack to not have a package dependency on hgu95av2
        ## but need to fiddle w/ the warn level to not fail the example anyways.
        curWarn <- options(warn=0)
        on.exit(options(warn=curWarn), add=TRUE)
        if (require(hgu95av2)) {

          z <- buildChromLocation("hgu95av2")
          cPlot(z)
          probes <- c("266_s_at", "31411_at", "610_at", "failExample")
          cColor(probes, "red", z)
          probes2 <- c("960_g_at", "41807_at", "931_at", "39032_at")
          cColor(probes2, "blue", z)
      } else print("Need hgu95av2 data package to run example")

