R/polyMul.R

In astsa: Applied Statistical Time Series Analysis

Defines functions polyMul

Documented in polyMul

polyMul <-
function(p, q){ 
m <- outer(p, q)
return(as.vector(tapply(m, row(m) + col(m), sum)))
}

Try the astsa package in your browser