function coins_plot ( m, n, v, label, filename )

%*****************************************************************************80
%
%% coins_plot() makes a plot of M sets of N coin tosses.
%
%  Licensing:
%
%    This code is distributed under the MIT license.
%
%  Modified:
%
%    23 February 2016
%
%  Author:
%
%    John Burkardt
%
%  Input:
%
%    integer M, the number of repetitions.
%
%    integer N, the number of tosses.
%
%    real V(M,N), the toss results, -1 or +1.
%
%    string LABEL, a label for the plot.
%
%    string FILENAME, a name for the plot file.
%
  i = 1 : n;
  clf;
  plot ( i, v, 'b.-', 'MarkerSize', 25, 'LineWidth', 2 );
  xlabel ( '<-- Tosses -->', 'FontSize', 16 )
  ylabel ( 'T <-------------------> H', 'FontSize', 16 )
  title ( label );
  limits = axis;
  limits(3) = -1.1;
  limits(4) = +1.1;
  axis ( limits );
  set ( gca, 'ytick', [] );

  print ( '-dpng', filename );
  fprintf ( 1, '\n' );
  fprintf ( 1, '  Saving a copy of this plot in "%s"\n', filename );

  return
end
