def _create_matrix_uniq_seq(sample_l, seq_l, maout, out, min_shared):
skip = <NUM_LIT:0><EOL>if int(min_shared) > len(sample_l):<EOL><INDENT>min_shared = len(sample_l)<EOL><DEDENT>maout.write("<STR_LIT>")<EOL>for g in sample_l:<EOL><INDENT>maout.write("<STR_LIT>" % g)<EOL><DEDENT>for s in seq_l.keys():<EOL><INDENT>seen = sum([<NUM_LIT:1> for g in seq_l[s].group if seq_l[s].group[g] > <NUM_LIT:0>])<EOL>if seen < int(min_shared):<EOL><INDENT>skip += <NUM_LIT:1><EOL>continue<EOL><DEDENT>maout.write("<STR_LIT>" % (seq_l[s].idx, seq_l[s].seq))<EOL>for g in sample_l:<EOL><INDENT>if g in seq_l[s].group:<EOL><INDENT>maout.write("<STR_LIT>" % seq_l[s].group[g])<EOL><DEDENT>else:<EOL><INDENT>maout.write("<STR_LIT>")<EOL><DEDENT><DEDENT>qual = "<STR_LIT>".join(seq_l[s].quality)<EOL>out.write("<STR_LIT>" % (seq_l[s].idx, seq_l[s].seq, qual))<EOL><DEDENT>out.close()<EOL>maout.close()<EOL>logger.info("<STR_LIT>" % (min_shared, skip))<EOL>
create matrix counts for each different sequence in all the fasta files

    :param sample_l: :code:`list_s` is the output of :code:`_read_fasta_files`
    :param seq_l: :code:`seq_s` is the output of :code:`_read_fasta_files`
    :param maout: is a file handler to write the matrix count information
    :param out: is a file handle to write the fasta file with unique sequences

    :returns: Null