Welcome to Practical Genomics Workshop 2018!!
M <- log2( endo+1 ) - log2( meso+1 )
A <- ( log2( endo+1 ) + log2( meso+1 ) ) / 2
plot( A, M, pch=20,
main="MA Plot Comparing Endoderm to Mesoderm RNA-seq" )


M <- log2( endo+1 ) - log2( meso+1 )
A <- ( log2( endo+1 ) + log2( meso+1 ) ) / 2
plot( A, M, pch=20,
main="MA Plot Comparing Endoderm to Mesoderm RNA-seq" )