Вниз
Скачать: CL | DM;

Фильтрация шума   Найти похожие ветки 

← →
Pahan07   (2005-05-31 13:27) [0]

Помогите пожалуйста!
Мна надо написать фильтр для гаусового (и/или белого) шума, для картинки или видеопотока.
В нете куча терии по математики, а мне нужно всего-то пара формул, как этот фильтр запрограммировать. С математикой плохо, а прогу надо написать позрез.
Подайте идеи, или, может, у кого исходники есть?


← →
Jeer ©   (2005-05-31 14:32) [1]

Тут ничем твоему горю не поможешь, т.к. телепатов здесь не водится - какой тебе фильтр нужен.

Хотя, вот тебе простейший:

Y(i+1) = A*Y(i) + B*X(i)


← →
programania ©   (2005-05-31 21:08) [2]

http://www.cee.hw.ac.uk/hipr/html/median.html
А короче надо сортировать пикселы вокруг и брать
средний по номеру, вот кусочек программы:

PROCEDURE noise;
var x,y,xx,yy,d,j,i,n,q,z:integer; m:array[1..81] of byte;
begin
d:=4; //1..4 радиус
q:=d*2+1; q:=q*q-1; q:=q div 2;
for y:=1 to h do for x:=1 to w do begin
 n:=0;
 for yy:=y-d to y+d do for xx:=x-d to x+d do
 if (yy<>y)or(xx<>x) then begin
   if (yy<1)or(xx<1)or(yy>h)or(xx>w) then z:=bi[y,x] else
// сортировка вставкой
   z:=bi[yy,xx];
   i:=1; while (i<=n)and(z>m[i]) do inc(i);
   for j:=n downTo i do m[j+1]:=m[j];
   inc(n);
   m[i]:=z;
 end;
 bb[y,x]:=m[q];
end;
end;



Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.45 MB
Время: 0.042 c
3-1125930670
_Lucky_
2005-09-05 18:31
2005.10.23
Возможно ли реализовать одним запросом на SQL, без использования


14-1128090329
Jolik
2005-09-30 18:25
2005.10.23
Русификация Install Shield Express с диска от Delphi 7...


1-1127736130
Kolan
2005-09-26 16:02
2005.10.23
Как изменить тип создоваемого объекта в методе предка.


1-1128334352
NightLord
2005-10-03 14:12
2005.10.23
ScanDisk


1-1128083388
B@BY
2005-09-30 16:29
2005.10.23
Функция для работы со временем (TDateTime)




   Наверх