a = upper(a) c = char(a')' for i=1:3 b = any(ismember(char(a)',[a{b}])); b = any(ismember(c,[a{b}])) end c=find(b)