# NOT RUN {
data(sprottK)
sprottK <- as.matrix(sprottK)
dMax <- 2
nVar <- dim(sprottK)[2]
#Example 1
polySeries2 <- regSeries(nVar, dMax, sprottK)
#Example 2
p <- c(1,3,1)
polySeries2 <- regSeries(nVar, dMax, sprottK, pReg=p)
# }
Run the code above in your browser using DataLab