Nothing
#!/usr/bin/Rscript
dim(counts(Re.example))
counts.12<-counts(Re.example)
colnames(counts.12)
install_github("aiminy/Sophia")
Data=counts.12
heatmap_wPCA(Data)
heatmap_wPCA(Data,g_level=c(rep("Mu",8),rep("WT",4)))
Any scripts or data that you put into this service are public.
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.