function skjdemo5
% SKJDEMO5 pohtii termiä "informaatio" kuvaesimerkin kautta.

% Jukka Parviainen, parvi@hut.fi, 15.1.2002, 17.1.2001.
% Tiedostot saatavilla 
% http://www.cis.hut.fi/Opinnot/T-61.140/  -> Vinkkejä ja linkkejä


%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%

close all;      % sulkee kaikki ikkunat
clc;            % puhdistaa ruudun

fprintf(1,'****************************************\n');
fprintf(1,'****************************************\n');
fprintf(1,'************  SKJDEMO5.m  **************\n');
fprintf(1,'****************************************\n');
fprintf(1,'*******      Informaatio        ********\n');
fprintf(1,'****************************************\n');
fprintf(1,'****************************************\n');
fprintf(1,'\n\n');

% Luetaan xfig:llä tehty piirros sisään muuttujaks D1
D1 = imread('skjdemo5.tif');  
% Luodaan satunnainen 256:n harmaasävykuva, joka on saman kokoinen
D2 = floor(256*rand(287,370));

figure(15), clf;
imagesc(D1), axis equal
title('Kuva 1 - kuvio');

figure(16), clf,
imagesc(D2), axis equal
title('Kuva 2 - satunnaisia harmaasävyjä, 256 sävyä');
colormap(gray);

clc;

fprintf(1,'Kuvan 1 tiedoston koko (tavua) eri formaateilla\n');
fprintf(1,'KUVA 1    JPG    GIF    XFIG   PNG   TIFF\n');
fprintf(1,'----------------------------------------------\n');
fprintf(1,'          30310  2516   420    3056  318894\n');

fprintf(1,'\n');
fprintf(1,'Mikä lienee Kuvan 2 informaatiomäärä?\n');
fprintf(1,'Mikä voisi olla tiedoston koon määrä?');




