# Simulate 20000 genes with 10 observations each
X <- matrix(rnorm(n=20000), ncol=10)
# Calculate the correlation for 5000 random gene pairs
cor <- sampleCorrelations(X, npairs=5000)
print(summary(cor))
Run the code above in your browser using DataLab