createSliceSet <- function(problemSpec, focusPoints, slices) {
r = list(problemSpec=problemSpec, focusPoints=focusPoints, slices=slices)
class(r) = "SliceSet"
r
}
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.