Using a source with a two-symbol alphabet, produce a test data set in which 99% of the symbols are 1s. Encode 1000 symbols from this source to produce a code vector with less than 1000 elements. The actual number of elements in the encoded sequence varies depending on the particular random sequence.

Specify for symbol 1 from the source alphabet to occur 99 times in the test data set.

counts = [99 1];

Generate a random sequence of length 1000.

len = 1000;
seq = randsrc(1,len,[1 2; .99 .01]);

Encode the random sequence. Then, decode the encoded sequence.

code = arithenco(seq,counts);
dseq = arithdeco(code,counts,length(seq));

Verify that the decoded sequence matches the original random sequence.

isequal(seq,dseq)

ans = logical
   1