function c1=nchar(c,n)
% nchar		- Creates copies of a character
% creates n copies of the character c and returns it
% in the vector c1.
c1 = [];
for k=1:n
    c1=[c1,c];
end
