--- a
+++ b/matlab/rgb2he.m
@@ -0,0 +1,27 @@
+function rgb2he(folder)
+subFolder = 'H&E';
+mkdir([folder subFolder])
+
+bmpListing = dir([folder '*.bmp']);
+csvListing = dir([folder '*.csv']);
+
+for i=1:size(bmpListing)
+    inFile = [folder bmpListing(i).name];
+    [pathstr, name, ext] = fileparts(inFile);
+    outFile = [pathstr '/' subFolder '/' name '.bmp'];
+
+    I = imread(inFile);
+    [Inorm, H, E] = normalizeStaining(I);
+    
+    [r, c, p] = size(I);
+    HE = zeros(r,c,p,'uint8');
+    HE(:,:,1) = rgb2gray(H);
+    HE(:,:,2) = rgb2gray(E);
+    
+    imwrite(HE,outFile)
+
+    copyfile([folder csvListing(i).name], [pathstr '/' subFolder '/' name '.csv']);
+end
+
+end
+