# NOT RUN {
## 1. EXAMPLE
## Data
X <- rnorm(2000)
## Univariate function
subclass <- "MOP"
f <- univMoTBF(X, POTENTIAL_TYPE = subclass)
dimensionFunction(f)
## 2. EXAMPLE
## Dataset with 2 variables
X <- data.frame(rnorm(100), rnorm(100))
## Joint function
dim <- c(2,3)
param <- parametersJointMoTBF(X, dimensions = dim)
P <- jointMoTBF(param)
## Dimension of the joint function
dimensionFunction(P)
# }
Run the code above in your browser using DataCamp Workspace