R/getMultiplicityPoly.R

Defines functions getMultiplicityPoly

getMultiplicityPoly <-
function(elements, multiplicity){
  num <- getSimplePolyProduct(elements, multiplicity)
  denom <- getSimplePolyProduct(multiplicity, multiplicity)
  
  return(as.numeric(as.polynomial(num)/denom))
}
bhklab/fastCI documentation built on Dec. 3, 2020, 12:17 a.m.