Biorthogonal spline wavelet family with exact rational filters
BiorthogonalSplineWavelet[]
BiorthogonalSplineWavelet[n, m]
Plot[WaveletPhi[BiorthogonalSplineWavelet[2, 4], x], {x, -4, 4}, PlotRange -> All]
→ -Graphics-Plot[WaveletPsi[BiorthogonalSplineWavelet[2, 4], x], {x, -2, 3}, PlotRange -> All]
→ -Graphics-WaveletFilterCoefficients[BiorthogonalSplineWavelet[2, 4], {"DualLowpass", "DualHighpass"}, WorkingPrecision -> ∞]
→ {{{-1, 1/4}, {0, 1/2}, {1, 1/4}}, {{-3, 3/128}, {-2, 3/64}, {-1, -1/8}, {0, -19/64}, {1, 45/64}, {2, -19/64}, {3, -1/8}, {4, 3/64}, {5, 3/128}}}