Skip to content
Snippets Groups Projects
Commit a50da5f6 authored by Fabó Norbert's avatar Fabó Norbert
Browse files

Update Szakdoga/szinvizsgalat_eredmenyek.ods, Szakdoga/ErezetHSV.fig,...

Update Szakdoga/szinvizsgalat_eredmenyek.ods, Szakdoga/ErezetHSV.fig, Szakdoga/HartyaHSV.fig, Szakdoga/HartyaRGB.fig, Szakdoga/ErezetRGB.fig, Szakdoga/crossingDetector.m, Szakdoga/edgeDetector.m, Szakdoga/imageColorStatistics.m, Szakdoga/KerdesekNaszyhoz.txt files
parents
No related branches found
No related tags found
No related merge requests found
File added
File added
File added
File added
A pannon méh fajtabélyegeinek meghatározásában használt módszerek aktualizálása képelemzési módszerek segítségével
- fajtabélyeg/fajtajelleg + a méh legyen benne
teljesítményvizsgálati kódex
feladathoz + megismerkedni a méhészet szakirodalmával
Képek:
Pontos azonosítási módszer?
Mért adatokkal párosítva?
Melyik családhoz tartozik?
A család pannonméh vagy sem?
Szipókahossz és szín hozzárendelve a szárnyhoz?
Hogyan kell különböző színű keretket csinálni? colormap
Github?
Miért nem jó ha full feketével filterelek?
Hogyan tovább?
A gráffal mit tudok csinálni?
+fény
hogbeforgatás
== Feladatok ==
Sorba legyenek rendezve a képek
a képek számozása előtti 0-k hozzárakása
pathfinding algorithms az erek hosszára
egy origo legyen
-------------------
* Min 100 dolgozó (150-200)
* Anyahnevelői és családkód rögzítése
5 családból küldenek be (2--nek kell megfelelni)
Ha nem felel meg három küld új mintát
* Megfőzzük a méheket(A szipókahossz miatt kell amúgy nem boncolható)
* fej levágása (20+epszilon)
* 50 szárny felragsztása, de csak 20 van mérve
ér rendellenesség (példák rá!!!!!!)
(felterjeszteni hogy több szárnyról mérni)
excel kérése(pontos szerkezete)
* 100 méh színvizsgálat (száradás után)
első tergit csíkon van sárga pötty vagy gyűrű az még oké(ha a teljes tergit sárga, az 5%ig mgengedett, 6%-tól már teljes kuka)
5%-nyi egy gyűrűs okés, ha kett vagy háom gyűrűs az teljesen kuka
(felterjeszteni, ne kelljen tovább mérni, ha kuka)
levágott fejeket alkoholban, hogy ne száradjanak ki olyan hamar(elvileg)
alkoholból kivenni, leitatni róla az akoholt
* 5 darab szipókát a tárgylemezre raknak, cellual rögzítenek
* másik módsezr: kétoldalú ragasztóroller + fedőlemez rá (erről van fénykép)
mikrofilmolvasó(bádogdoboz)val mérik (gyorsabb és a pontatlanság miatt hosszabbnak tűnik a szipóka[akár 0.1 mm eltérés is lehet]) (17.5x es nagyítás elvileg)
a kétoldalú lassabb, de pontosabb (ez még nincs leírva)[NE EMLÍTSEM MEG]
összesen 20 db van mérve, az átlagnak 6.5-nek kell lennie
MMOE elnöke, beszélni vele (Horváth János)
van tenyésztés vezetőjü is (Szalai Tamás) Inkább vele beszéljek. (Timi javaslatára) (+36302108899)(egyetem honlapján elv van emailcím)
szárny(55 jobboldali, nagy)
* tojásfehérjével felragasztani tárgylemezre
Megkérdezni külföldi laborokat
szlovákiai méhészeti kutatóintézetet megkérdezni
az a/b szakasz látszódik csak a képen 100x-os nagyítással van mérve
nyomtatni egy 17.5x nagyítású vonalzót (viccelődés)
excelben van az is
20 szárny van mérve
csak az a család kap egy törzskönyvi számot akik átmentek eme 3 teszten
évente van vizsgálva
kb 2013-ban kérvényezték, hogy ne krajnai, hanem pannonméh legyen, viszon a pannonméh
jogilag a pannon a helyes, taxonómiailag viszont a krajnai a helyes(irodalom: nébih határozat)
[NE ÍRD BELE]->
function [RES] = crossingDetector(IMG)
IMG = ~logical(IMG(:,:,1));
Width = size(IMG,2);
Height = size(IMG, 1);
RES = zeros(Height, Width);
filter1 = [ 0 1 0;...
1 1 1;...
0 1 0];
%A k�p 1 pixeles keret�t nem n�zz�k,
%de az nem is relev�ns
for x = 2:Width-1
for y = 2:Height-1
%Ha nem vonal, akkor biztos nem csom�pont
if ~IMG(y,x)
continue
end
if x == 17 && y == 69
a = 2+4;
end
sum = 0;
for w = 1:3
for h = 1:3
sum = sum + IMG(y+h-2, x+w-2);
end
end
if sum > 4
RES(y,x) = 1;
end
end
end
end
\ No newline at end of file
function [resultIMG] = edgeDetector(IMG)
resultIMG = IMG;
end
\ No newline at end of file
function [] = imageColorStatistics(name)
yAxisR = zeros(1,256);
yAxisG = zeros(1,256);
yAxisB = zeros(1,256);
yAxisH = zeros(1,361);
yAxisS = zeros(1,101);
yAxisV = zeros(1,101);
%images = ["hartya01.jpg", "hartya02.jpg", "hartya03.jpg", "hartyaDark.jpg"];
images = ["erezet01.jpg"];
for db = 1:size(images, 2)
IMG = imread(images(db));
IMGHSV = rgb2hsv(IMG);
for x = 1:size(IMG, 2)
for y = 1:size(IMG, 1)
R = IMG(y,x,1);
G = IMG(y,x,2);
B = IMG(y,x,3);
H = floor(IMGHSV(y,x,1)*360)+1;
S = floor(IMGHSV(y,x,2)*100)+1;
V = floor(IMGHSV(y,x,3)*100)+1;
if R > 220
continue
end
yAxisR(R) = yAxisR(R)+1;
yAxisG(G) = yAxisG(G)+1;
yAxisB(B) = yAxisB(B)+1;
%round(IMGHSV(x,y,1)*360)+1
%round(IMGHSV(x,y,2)*100)+1
%round(IMGHSV(x,y,3)*100)+1
yAxisH(H) = yAxisH(H)+1;
yAxisS(S) = yAxisS(S)+1;
yAxisV(V) = yAxisV(V)+1;
end
end
end
xAxis = 0:255;
figure('Name', strcat(name, 'RGB'))
plot(xAxis, yAxisR, '-r', xAxis, yAxisG, '-g', xAxis, yAxisB, '-b')
figure('Name', strcat(name, 'HSV'))
plot(1:361, yAxisH, '-r', 1:101, yAxisS, '-g', 1:101, yAxisV, '-b')
end
\ No newline at end of file
File added
0% Loading or .
You are about to add 0 people to the discussion. Proceed with caution.
Please register or to comment