WOLFRAM

Wolfram 语言与系统参考资料中心

WaveletPhi[wave,x]

给出符号小波 wave 在 x 处进行计算的尺度函数 .

WaveletPhi[wave]

把尺度函数作为纯函数给出.

更多信息和选项
Details and Options Details and Options
范例  
基本范例  
范围  
选项  
MaxRecursion  
WorkingPrecision  
属性和关系  
巧妙范例  
参见
相关指南
历史
按以下格式引用：

WaveletPhi

WaveletPhi[wave,x]

给出符号小波 wave 在 x 处进行计算的尺度函数 .

WaveletPhi[wave]

把尺度函数作为纯函数给出.

更多信息和选项

范例

打开所有单元 关闭所有单元

基本范例  (2)

Haar 尺度函数：

Wolfram Language code: Plot[WaveletPhi[HaarWavelet[], x], {x, -1, 2}, Exclusions -> None]
Wolfram Language code: WaveletPhi[HaarWavelet[], x]

Symlet 尺度函数：

Wolfram Language code: Plot[WaveletPhi[SymletWavelet[5], x], {x, 0, 9}, PlotRange -> All]
Wolfram Language code: WaveletPhi[SymletWavelet[5], x]

范围  (4)

计算原尺度函数：

Wolfram Language code: ϕ = WaveletPhi[DaubechiesWavelet[3]]
Wolfram Language code: Plot[ϕ[x], {x, 0, 5}, PlotRange -> All]

对偶尺度函数：

Wolfram Language code: Overscript[ϕ, ~] = WaveletPhi[BiorthogonalSplineWavelet[3, 5], x, "Dual"]
Wolfram Language code: Plot[Overscript[ϕ, ~], {x, -1, 2}, PlotRange -> All]

对于 HaarWavelet 的尺度函数 ：

Wolfram Language code: Plot[WaveletPhi[HaarWavelet[], x], {x, -0.5, 1.5}, Exclusions -> None]

DaubechiesWavelet：

Wolfram Language code: Plot[WaveletPhi[DaubechiesWavelet[3], x], {x, 0, 5}]

SymletWavelet：

Wolfram Language code: Plot[WaveletPhi[SymletWavelet[5], x], {x, 0, 9}, PlotRange -> All]

CoifletWavelet：

Wolfram Language code: Plot[WaveletPhi[CoifletWavelet[2], x], {x, -4, 7}, PlotRange -> All]

BiorthogonalSplineWavelet：

Wolfram Language code: Plot[WaveletPhi[BiorthogonalSplineWavelet[2, 4], x], {x, -4, 4}, PlotRange -> All]

ReverseBiorthogonalSplineWavelet：

Wolfram Language code: Plot[WaveletPhi[ReverseBiorthogonalSplineWavelet[5, 5], x], {x, -2, 3}, PlotRange -> All]

CDFWavelet：

Wolfram Language code: Plot[WaveletPhi[CDFWavelet[], x], {x, -4, 4}, PlotRange -> All]

ShannonWavelet：

Wolfram Language code: Plot[WaveletPhi[ShannonWavelet[8], x], {x, -8, 8}, PlotRange -> All]

BattleLemarieWavelet：

Wolfram Language code: Plot[WaveletPhi[BattleLemarieWavelet[6, 8], x], {x, -8, 8}, PlotRange -> All]

MeyerWavelet：

Wolfram Language code: Plot[Re@WaveletPhi[MeyerWavelet[2, 5], x], {x, -5, 5}, PlotRange -> All]

多元尺度和小波函数是单变量的积：

Wolfram Language code: ϕ = WaveletPhi[HaarWavelet[]]; ψ = WaveletPsi[HaarWavelet[]];
Wolfram Language code: Table[Plot3D[Evaluate[f[x] g[y]], {x, 0, 1.0}, {y, 0, 1.0}, ExclusionsStyle -> Opacity[0.5], Mesh -> None, Axes -> False], {f, {ϕ, ψ}}, {g, {ϕ, ψ}}]

选项  (3)

MaxRecursion  (1)

使用不同层次的递归绘制尺度函数：

Wolfram Language code: Table[Plot[WaveletPhi[SymletWavelet[3], x, MaxRecursion -> i], {x, 0, 6}, PlotLabel -> i, PlotRange -> All], {i, 1, 8, 2}]

WorkingPrecision  (2)

默认情况下，使用 WorkingPrecision->MachinePrecision：

Wolfram Language code: Subscript[ϕ, 1] = WaveletPhi[DaubechiesWavelet[4]]
Wolfram Language code: Subscript[ϕ, 2] = WaveletPhi[DaubechiesWavelet[4], WorkingPrecision -> MachinePrecision]
Wolfram Language code: Subscript[ϕ, 1] == Subscript[ϕ, 2]

使用高精度滤波器计算：

Wolfram Language code: WaveletPhi[SymletWavelet[4], 2, WorkingPrecision -> 20]
Wolfram Language code: Precision[%]

属性和关系  (4)

尺度函数的积分为1 ：

Wolfram Language code: Integrate[WaveletPhi[HaarWavelet[], x], {x, -∞, ∞}]

特别地，：

Wolfram Language code: Table[Integrate[WaveletPhi[HaarWavelet[], (x/2^j)], {x, -∞, ∞}] == 2^j, {j, 0, 4}]

满足递归方程 ：

Wolfram Language code: ϕ = WaveletPhi[DaubechiesWavelet[2]];
Wolfram Language code: a = WaveletFilterCoefficients[DaubechiesWavelet[2], "PrimalLowpass"];

绘制分量和递归的和：

Wolfram Language code: scalet[x_, ϕ_, a_] := 2Table[a[[i, 2]]ϕ[2x - a[[i, 1]]], {i, Length[a]}]
Wolfram Language code: {Plot[Evaluate@scalet[x, ϕ, a], {x, 0, 3}, PlotRange -> All], Plot[Total@scalet[x, ϕ, a], {x, 0, 3}, PlotRange -> All]}

的频率响应由 给出：

Wolfram Language code: h[wav_, ω_] := With[{a = WaveletFilterCoefficients[wav]}, Sum[a[[i, 2]]Exp[-I a[[i, 1]]ω], {i, Length[a]}]]

该滤波器是一个低通滤波器：

Wolfram Language code: Plot[Abs[h[DaubechiesWavelet[2], ω]], {ω, -π, π}, Ticks -> {{-π, -(π/2), 0, (π/2), π}, Automatic}, AxesLabel -> {ω, Abs[H[ω]]}]

的傅立叶变换由 给出：

Wolfram Language code: h[wav_, ω_] := With[{a = WaveletFilterCoefficients[wav]}, Sum[a[[i, 2]]Exp[-I a[[i, 1]]ω], {i, Length[a]}]]
Wolfram Language code: fh[wav_, ω_, j_] := Abs[Product[h[wav, (ω/2^i)], {i, j}]]
Wolfram Language code: Plot[fh[DaubechiesWavelet[2], ω, 10], {ω, -10Pi, 10Pi}, PlotRange -> All, AxesLabel -> {ω, Abs[Overscript[ϕ, ^ ][ω]]}]

巧妙范例  (1)

绘制尺度函数的平移和伸缩：

Wolfram Language code: ϕ[x_, j_, k_] := 2^j / 2WaveletPhi[CoifletWavelet[1], 2^jx - k]
Wolfram Language code: Plot[Evaluate@Table[ϕ[x, j, 0], {j, 0, 4}], {x, -0.5, 0.5}, Filling -> Axis, PlotRange -> All]
Wolfram Language code: Plot[Evaluate@Table[ϕ[x, 2, k], {k, 0, 2^2 - 1}], {x, -0.5, 1.5}, Filling -> Axis, PlotRange -> All]
Wolfram Research (2010)，WaveletPhi，Wolfram 语言函数，https://reference.wolfram.com/language/ref/WaveletPhi.html.

文本

Wolfram Research (2010)，WaveletPhi，Wolfram 语言函数，https://reference.wolfram.com/language/ref/WaveletPhi.html.

CMS

Wolfram 语言. 2010. "WaveletPhi." Wolfram 语言与系统参考资料中心. Wolfram Research. https://reference.wolfram.com/language/ref/WaveletPhi.html.

APA

Wolfram 语言. (2010). WaveletPhi. Wolfram 语言与系统参考资料中心. 追溯自 https://reference.wolfram.com/language/ref/WaveletPhi.html 年

BibTeX

@misc{reference.wolfram_2026_waveletphi, author="Wolfram Research", title="{WaveletPhi}", year="2010", howpublished="\url{https://reference.wolfram.com/language/ref/WaveletPhi.html}", note=[Accessed: 14-November-2026]}

BibLaTeX

@online{reference.wolfram_2026_waveletphi, organization={Wolfram Research}, title={WaveletPhi}, year={2010}, url={https://reference.wolfram.com/language/ref/WaveletPhi.html}, note=[Accessed: 14-November-2026]}