Skip to content

Instantly share code, notes, and snippets.

@ohofmann
Created February 1, 2012 16:47
Show Gist options
  • Save ohofmann/1717966 to your computer and use it in GitHub Desktop.
Save ohofmann/1717966 to your computer and use it in GitHub Desktop.
pdf('X_withDuplicates_labels.pdf', width=14, height=14)
plot(mdX,
pch=15,
col=c(rgb(255, 0, 0, 100, maxColorValue=255),
rgb(0, 0, 255, 100, maxColorValue=255))[pData(lumiData)$Sex],
cex=1.2)
text(mdX[, 1], mdX[, 2], labels=pData(lumiData)$SampleLabel, cex=.75)
dev.off()
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment