Nothing
library(REIDS)
load("REIDS_Output.RData")
groupHMPT=c(7,8,9,16,17,18,22,23,24,31,32,33)
groupOthers=c(1,2,3,4,5,6,10,11,12,13,14,15,19,20,21,25,26,27,28,29,30)
groups=list(group1=groupHMPT,group2=groupOthers)
TissueData_ExonTesting=ExonTesting(Data=REIDS_Output, Exonthreshold=NULL,groups=groups,paired=FALSE,significancelevel=NULL)
save(TissueData_ExonTesting,file="TissueData/Data_ExonTesting.RData")
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.