Poniżej zamieszczam materiały, które mogą się przydać do porównywania JPEG z JPEG2000. Plik oryginalny (JPEG2000 lossless) [6,8 MB] JPEG (Q = 14%) [211,5 kB] JPEG+PAQ (Q = 14% + paq8l -9) [153 kB] JPEG2000 (R = 115) [152,7 kB] Poniżej porównanie formatów (fragment zdjęcia 1:1) I drugie

Wstęp Rozdział traktować będzie o algorytmach porównywania z oryginałem skompresowanych obrazów i – na podstawie wyników –  ocena, który obraz jest lepszej jakości. Innymi słowy – syntetyczny test jakości kompresji. Obraz wejściowy kompresowany jest do JPEG za pomocą wewnętrznej biblioteki Matlab. Konwersja z i do JPEG2000 wykonywana jest za pomocą zewnętrznej biblioteki OpenJPEG (potrzebne są…

Prosty program w Matlabie do wykrywania krawędzi. Zastosowano filtr Sobel. Wersja kompatybilna z programem Octave w osobnym dziale.   [pictureone, user_canceled1] = imgetfile;scale = 20;threshold = 25;if (user_canceled1) fprintf(’nAnulowales wybieranie plikow do porownania!n’)else %read file Aread = imread(pictureone); A = double(rgb2gray(Aread)); %kernels kGx = [1 0 -1;2 0 -2;1 0 -1]; kGy = [1 2…

Steganografia w Matlabie (kiedyś będzie szerszy opis). Kod zoptymalizowany pod Matlaba; nie będzie działał z Octave (osobny skrypt w odpowiednim dziale niedługo zostanie wstawiony).   [pictureone, user_canceled1] = imgetfile;[picturetwo, user_canceled2] = imgetfile;width = 640;if (user_canceled1 || user_canceled2) fprintf(’nAnulowales wybieranie plikow do porownania!n’)else %Opening both files Aread = imread(pictureone); Bread = imread(picturetwo); %Dithering [Bwidth Bheight Bplanes]…

Kilka efektów dźwiękowych w programie Matlab. Wersja w pełni kompatybilna z Octave.   filename = 'examples/test.wav’;[Input, FS, BITS] = wavread(filename);% Butterworth filter[b, a] = butter(20, 0.2);Output = filter(b, a, Input);wavwrite(Output, FS, BITS, 'examples/out01_LP_Filter.wav’);% Double speedOutputFast = downsample(Output, 2);wavwrite(OutputFast, FS, BITS, 'examples/out02_Double_Speed.wav’);% Half speed – with zerosOutputSlow = upsample(Output, 2);wavwrite(OutputSlow, FS, BITS, 'examples/out03_Half_Speed.wav’);% Half speed -…