# Compute the spectrum of the scalar glueballs 0^{++}
#' @export
ScalarGlueballSpectra <- function(nEigenvalues = 5)
{
s <- computeSpectrum(z, u0, nEigen = nEigenvalues)
s
}
# Compute the spectrum of the scalar glueballs 2^{++}
#' @export
TensorGlueballSpectra <- function(nEigenvalues = 5)
{
s <- computeSpectrum(z, u2, nEigen = nEigenvalues)
s
}
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.