function FullA4Plot(Input,pcols)
nm=1;
for n= 1:size(Input,2);
    for m=1:pcols;
subplot(n,m,nm);
plot(Input(:,nm))
nm=nm+1;
    end
end