function sequence_streak ( file_name )

%*****************************************************************************80
%
%% sequence_streak() makes a "streak plot" of a sequence.
%
%  Discussion:
%
%    The sequence information is assumed to be available in
%    a text file, with one sequence entry per line.
%
%    One reason for making plots this way is to try to
%    see the "fill in" pattern of a sequence.  For instance,
%    the van der Corput sequence has the property that all
%    entries lie in [0,1], and that it first eliminates all
%    gaps of size 1/2, then of size 1/4, then 1/8 and so on.
%
%    Perhaps a second reason for looking at plots this way
%    is to notice patterns of convergence in a sequence.
%
%  Example:
%
%    The sequence 1, 3, 5, 7, 6, 2, 4 would plot as
%
%       *---
%        *--
%      *----
%          *
%     *-----
%         *-
%    *------
%
%  Licensing:
%
%    This code is distributed under the MIT license.
%
%  Modified:
%
%    25 February 2006
%
%  Author:
%
%    John Burkardt
%
%  Input:
%
%    string FILE_NAME, the name of a text file containing
%    the sequence.
%
  y = load ( file_name );

  n = length ( y );

  plot ( y, '*' );

  for i = 1 : n
    line ( [i, n], [y(i), y(i) ] );
  end

  return
end
