%% Linear combination animation
	h =  []; % Initial handle to plot
	k = 1; % Index of snapshot

	MyFig = figure;
	axis off
	set(gca,'nextplot','replacechildren','visible','off')

for c = 0:255
	FunnyColor = 25*red + 35*green + c*blue;
    MaxValue = max(max(max(FunnyColor)));
	
    h = image(1/MaxValue*FunnyColor);
   
    hh = im2frame(h);
    %im = frame2im(g);
%	[img(:,:,1,k),cm] = rgb2ind(im,256,'nodither');
	k = k+1;
end

% Write the animated gif  
%imwrite(img,cm,'ColorParameter.gif','gif','LoopCount',inf);


