geneprofile             package:maanova             R Documentation

_E_x_p_r_e_s_s_i_o_n _p_l_o_t _f_o_r _s_e_l_e_c_t_e_d _g_e_n_e_s

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

     This function generate a plot with many lines. Each line
     represents a gene. The y-axis is the estimated expression level
     for the given factor from ANOVA model. The x-axis is for the
     levels of the give factor, e.g.,  different strains.

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

     geneprofile(anovaobj, term, geneidx,
                 col="blue", type="b", ylim, xlab, ylab, ...)

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

anovaobj: An object of class 'maanova'. It should be the result from
          'fitmaanova'.

    term: The terms to be plotted.

 geneidx: The index of genes to be plotted.

     col: The color to be used in plot.

    type: The line type.

    ylim: Y-axis limit.

    xlab: X-axis label.

    ylab: Y-axis label.

     ...: Other parameters to be passed to 'plot'.

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

     Hao Wu

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

     # load in data
     data(paigen)
     # make data object with rep 2
     paigen <- createData(paigen.raw, 2)
     # make an additive model
     model.add.fix <- makeModel(data=paigen, formula=~Dye+Array+Strain+Diet)
     # fit ANOVA model
     anova.add <- fitmaanova(paigen, model.add.fix)
     # test strain effect
     ## Not run: test.Strain.fix <- matest(paigen, model.add.fix, term="Strain", n.perm=100)
     # volcano plot
     idx <- volcano(test.Strain.fix)

     # do gene profile for the selected genes
     geneprofile(anova.add, "Strain", idx$idx.all)## End(Not run)

