Nothing
## Load package
library("SPUTNIK")
## Create the msi.dataset-class object
sz <- c(5, 4)
x <- matrix(rnorm(sz[1] * sz[2] * 20), sz[1] * sz[2], 20)
x[x < 0] <- 0
mz <- sort(sample(100, ncol(x)))
msiX <- msiDataset(x, mz, sz[1], sz[2])
## Get m/z vector
mz <- getMZ(msiX)
## Get intensity matrix
X <- getIntensityMat(msiX)
## Get image size
sz <- getShapeMSI(msiX)
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.