function [ tries_min, tries_mean, tries_max, tries_var ] = full_deck_stats ( n )

%*****************************************************************************80
%
%% full_deck_stats() returns statistics for N tries of the full deck problem.
%
%  Licensing:
%
%    This code is distributed under the MIT license.
%
%  Modified:
%
%    21 May 2022
%
%  Author:
%
%    John Burkardt
%
%  Input:
%
%    integer n: the number of times the process will be carried out.
%
%  Output:
%
%    integer tries_min, real tries_mean, integer tries_max, real tries_var: 
%    the minimum, average, maximum and variance for the number of cards drawn 
%    over all the processes.
%
  m = zeros ( n, 1 );
  for i = 1 : n
    deck = full_deck_try ( );
    m(i) = sum ( deck );
  end

  tries_min = min ( m );
  tries_max = max ( m );
  tries_mean = mean ( m );
  tries_var = var ( m );

  return
end

