File:Daubechies4-functions.svg
Aus Wikimedia Commons, dem freien Medienarchiv
Zur Navigation springen
Zur Suche springen
Größe der PNG-Vorschau dieser SVG-Datei: 800 × 600 Pixel. Weitere Auflösungen: 320 × 240 Pixel | 640 × 480 Pixel | 1.024 × 768 Pixel | 1.280 × 960 Pixel | 2.560 × 1.920 Pixel | 1.000 × 750 Pixel.
Originaldatei (SVG-Datei, Basisgröße: 1.000 × 750 Pixel, Dateigröße: 10 KB)
Dateiinformationen
Strukturierte Daten
Bildtexte
Beschreibung[Bearbeiten]
BeschreibungDaubechies4-functions.svg |
English: Daubechies 4 tap wavelet and scaling functions |
Datum | |
Quelle | Eigenes Werk |
Urheber | LutzL |
Andere Versionen | Daubechies4-functions.png |
Lizenz[Bearbeiten]
Ich, der Urheberrechtsinhaber dieses Werkes, veröffentliche es hiermit unter der folgenden Lizenz:
Diese Datei ist unter der Creative-Commons-Lizenz „Namensnennung – Weitergabe unter gleichen Bedingungen 3.0 nicht portiert“ lizenziert.
- Dieses Werk darf von dir
- verbreitet werden – vervielfältigt, verbreitet und öffentlich zugänglich gemacht werden
- neu zusammengestellt werden – abgewandelt und bearbeitet werden
- Zu den folgenden Bedingungen:
- Namensnennung – Du musst angemessene Urheber- und Rechteangaben machen, einen Link zur Lizenz beifügen und angeben, ob Änderungen vorgenommen wurden. Diese Angaben dürfen in jeder angemessenen Art und Weise gemacht werden, allerdings nicht so, dass der Eindruck entsteht, der Lizenzgeber unterstütze gerade dich oder deine Nutzung besonders.
- Weitergabe unter gleichen Bedingungen – Wenn du das Material wiedermischst, transformierst oder darauf aufbaust, musst du deine Beiträge unter der gleichen oder einer kompatiblen Lizenz wie das Original verbreiten.
Es ist erlaubt, die Datei unter den Bedingungen der GNU-Lizenz für freie Dokumentation, Version 1.2 oder einer späteren Version, veröffentlicht von der Free Software Foundation, zu kopieren, zu verbreiten und/oder zu modifizieren; es gibt keine unveränderlichen Abschnitte, keinen vorderen und keinen hinteren Umschlagtext.
Der vollständige Text der Lizenz ist im Kapitel GNU-Lizenz für freie Dokumentation verfügbar.http://www.gnu.org/copyleft/fdl.htmlGFDLGNU Free Documentation Licensetruetrue |
Du darfst es unter einer der obigen Lizenzen deiner Wahl verwenden.
file daubechies.magma[Bearbeiten]
see en:Magma computer algebra system, with link for an online calculator.
R<I>:=ComplexField(30);
LP<Z> := LaurentSeriesRing(R);
T:=(-Z+2-Z^-1)/4;
TR<U>:=PowerSeriesRing(R);
Pol<X>:=PolynomialRing(R);
readi A,"What accuracy should the wavelets have?";
PolarFactorization:=function(A)
pp:=Truncate( (1-U+O(U^A))^-A );
pp:=Evaluate(pp,X);
p:=LP!1;
for rr in Roots(pp) do
r:=rr[1];r;
for ff in Roots(X^2+(4*r-2)*X+1) do
f:=ff[1];
if Abs(f) ge 1 then p*:=Z-f; end if;
end for;
end for;
p1:=Evaluate(p,1);
return LP![ Real(c): c in Eltseq(p/p1) ],pp;
end function;
p,p2:=PolarFactorization(A);p;a:=2^(1-A)*(1+Z)^A*p;a2:=(1-X)^A*p2;
"Scaling sequence",Coefficients(a),"product filter", Coefficients(a2);
Decimation:= function(c)
return LP![ Coefficient(c,2*k): k in [0..Degree(c) div 2+2] ];
end function;
// Power iteration for the values of the scaling function at integer locations
shape := LP!(Z^A);
for i := 1 to 10 do
for k := 1 to 10 do
shape := Decimation(a*shape); shape := shape/Evaluate(shape,1);
end for;
shape:=LP![ R!(1+Coefficient(shape,k))-1: k in [0..Degree(shape)] ];
end for;
wave := LP![ (-1)^k*Coefficient(a,2*A-k): k in [1..2*A] ];
scal := shape;
dx := 1; supp := 2*A-1; pow:=1;
for i := 1 to 4 do
scal := scal*LP!Evaluate(a,Z^pow);
dx /:=2; supp *:=2; pow*:=2;
end for;
wave := scal*LP!Evaluate(wave,Z^pow);
scal := scal*LP!Evaluate(a,Z^pow);
dx /:=2; supp *:=2; pow*:=2;
a2;
fp := Open(Sprintf("daub%o-scal.dat",A),"w");
RO:=RealField(12);
for k := 1 to supp do
fprintf fp, "%o\t%o\t%o\t%o\t%o\n",RO!(k*dx),
RO!Coefficient(scal,k),
RO!Coefficient(wave,k),
RO!Abs(Evaluate(scal,Exp(I*2*Pi(RO)*dx^2*k))*dx),
RO!Abs(Evaluate(wave,Exp(I*2*Pi(RO)*dx^2*k))*dx);
end for;
Flush(fp);
set data style lines
set zeroa
set key bottom
set term svg enhanced size 1000,750 fsize 24
set out "Daubechies4-functions.svg"
set title "Daubechies 4 tap wavelet"
pl "daub2-scal.dat" u 1:2 ti "scaling function" w lines lt 3 lw 3,\
"daub2-scal.dat" u 1:3 ti "wavelet function" w lines lt 1 lw 3
set out
Dateiversionen
Klicke auf einen Zeitpunkt, um diese Version zu laden.
Version vom | Vorschaubild | Maße | Benutzer | Kommentar | |
---|---|---|---|---|---|
aktuell | 11:25, 11. Sep. 2009 | 1.000 × 750 (10 KB) | LutzL (Diskussion | Beiträge) | {{Information |Description={{en|1=Daubechies 4 tap wavelet and scaling functions}} |Source=Own work by uploader |Author=LutzL |Date=2009-09-11 |Permission= |other_versions=Daubechies4-functions.png }} Category:Wavelets [[Category:Gnupl |
Du kannst diese Datei nicht überschreiben.
Dateiverwendung
Die folgenden 2 Seiten verwenden diese Datei:
Globale Dateiverwendung
Die nachfolgenden anderen Wikis verwenden diese Datei:
- Verwendung auf ca.wikipedia.org
- Verwendung auf da.wikipedia.org
- Verwendung auf de.wikipedia.org
- Verwendung auf en.wikipedia.org
- Verwendung auf eo.wikipedia.org
- Verwendung auf uk.wikipedia.org
Metadaten
Diese Datei enthält weitere Informationen, die in der Regel von der Digitalkamera oder dem verwendeten Scanner stammen. Durch nachträgliche Bearbeitung der Originaldatei können einige Details verändert worden sein.
Bildtitel | Produced by GNUPLOT 4.2 patchlevel 4 |
---|