Facebook
From Buff Bison, 9 Years ago, written in Plain Text.
Embed
Download Paste or View Raw
Hits: 722
  1. %LIFTING dla Haar i Spline
  2. clc
  3. close all
  4. clear all
  5.  
  6.  
  7. %% wczytanie danych - rgb to gray, im2double
  8. image = imresize(double(rgb2gray(imread('bikes.bmp'))),[64,64]);
  9. [n,m] = size(image);
  10. im = image;
  11.  
  12. %Liczba poziomów rozkładu
  13. lP = 5;
  14.  
  15. %% Haar dla danej liczby poziomów
  16. for i = 1 : lP
  17.     [d, im] = haarTransform(im,1);
  18.     [wynik{i}.detale_1, wynik{i}.image_1] = haarTransform(im,2);
  19.     [wynik{i}.detale_3, wynik{i}.detale_2] = haarTransform(d,2);
  20.     im = wynik{i}.image_1;
  21. end
  22.  
  23. %% Wyrysowanie piramidy
  24. piramida = [wynik{i}.image_1 wynik{i}.detale_1;wynik{i}.detale_2 wynik{i}.detale_3];
  25. for i=lP-1:-1:1
  26.        piramida = [piramida wynik{i}.detale_1;wynik{i}.detale_2 wynik{i}.detale_3];
  27. end
  28. imshow(piramida,[])
  29. %% Zerowanie wartości
  30.     wynik = clearLevel(wynik,[2],[0 0 1]);
  31. %% Transformata odwrotna
  32. obraz = [];
  33. for i = lP:-1:1
  34.     obraz= inversHaarTransform(wynik{i},obraz);
  35. end
  36. figure
  37. imshowpair(obraz,image,'montage')