champ.colname <- function(beta,pd) { c=colnames(beta) for( i in 1:length(c)){c[i]= pd$Sample_Name[i]} colnames(beta)=c return(beta) }
Add the following code to your website.
REMOVE THIS Copy to clipboard
For more information on customizing the embed code, read Embedding Snippets.