//Color separation into R,B,G
//Scilab 5.4.1
//Windows 10 
//Requires SIVP, IPD toolboxes

clear;
clc;

a=imread('peppers.png');

a1 = a;
b1 = a;
c1 = a;
a1(:,:,1)=0;
b1(:,:,2)=0;
c1(:,:,3)=0;

imwrite(a1, 'RedMissing.jpeg');
imwrite(b1, 'GreenMissing.jpeg');
imwrite(c1, 'BlueMissing.jpeg');
