isrepetition: Determine TRUE or FALSE for repetition terms in a cell

Determine TRUE or FALSE for repetition terms in a cell % tfs = isrepetition(A)

% tfs = isrepetition(A)
% [e-mail]
% Example I
% if
% tfs = isrepetition({'1', '2', '1', '2', '3'})
% then
% tfs =
% 1 0 0
% 0 1 0
% 1 0 0
% 0 1 0
% 0 0 1
%
% Example II
% if
% A =
% '1' '2'
% '1' '3'
% '4' '3'
% tfs = isrepetition(A)
% then
% tfs(:,:,1) =
% 1 0
% 1 0
% 0 0
% tfs(:,:,2) =
%
% 0 1
% 0 0
% 0 0
% tfs(:,:,3) =
% 0 0
% 0 1
% 0 1
% tfs(:,:,4) =
% 0 0
% 0 0
% 1 0