# Simulate Gaussian expression data for 10 genes and 10 samples
gene.expr=matrix(rnorm(100), nrow=10)
# Use 0 as mean.expr
mean.expr=rep(0,10)
# Simulate tissue-specific weights
tissue.specificity = runif(10, min=0.5, max=1.5)
# Execute TPAC to compute positive, negative and overall scores
tpac(gene.expr=gene.expr, mean.expr=mean.expr, tissue.specificity=tissue.specificity)
Run the code above in your browser using DataLab