function bigram_frequency_print ( freq, label )

%*****************************************************************************80
%
%% bigram_frequency_print() prints the letter-pair frequency table.
%
%  Licensing:
%
%    This code is distributed under the MIT license.
%
%  Modified:
%
%    21 March 2021
%
%  Author:
%
%    John Burkardt
%
%  Input:
%
%    integer FREQ(27,27): the number of times character i
%    was immediately followed by character j.
%
%    character LABEL, a label for the data.
%
  s = sum ( sum ( freq ) );

  fprintf ( 1, '\n' );
  fprintf ( 1, '%s\n', label );
  fprintf ( 1, '  Characters processed: %d + 2\n', s - 2 );
  fprintf ( 1, '\n' );
  fprintf ( 1, '   c2:' )
  for ( j = 1 : 27 )
    if ( j < 27 )
      c2 = 'a' + j - 1;
    else
      c2 = '*';
    end
    fprintf ( 1, '  %c', c2 );
  end
  fprintf ( 1, '\n' );
  fprintf ( 1, '  c1\n' );
  for i = 1 : 27
    if ( i < 27 )
      c1 = 'a' + i - 1;
    else
      c1 = '*';
    end
    fprintf ( 1, '  %c:  ', c1 );
    for j = 1 : 27
      fprintf ( 1, '  %d', freq(i,j) );
    end
    fprintf ( 1, '\n' );
  end

  return
end

