# NOT RUN {
X <- cornell0[,1:3]
# Monomials expressed by variable numbers:
monomials <- c("1","2","3", "1*2*3")
polyXI <- vect2polyX (X, monomials)
# Monomials expressed by variable names:
monomials <- c("Distillation", "Reformat", "NaphthaT",
"Distillation*Reformat*NaphthaT")
polyXI <- vect2polyX (X, monomials)
# }
Run the code above in your browser using DataLab