function [R] = Correlate2DDisplay3D(csv_name, w, intFlg, n, fig)
% Generate an n x n matrix representing R(0) through R(n-1)
% .. (shift correlations)
% .. for the rows and columns of the matrix contained in "csv_name.csv"
% Display the 3D mesh of the resulting correlation matrix, using Figure(fig).
%
% 16 Jan 2009 D.Bozarth - SSU Engineering Science
%
fiRe = strcat(csv_name, '.csv');
foRe = strcat(csv_name, '.cor.csv');

fiIm     = '';
foIm     = '';
polFlg   = 0;

R = Correlate2D( fiRe, fiIm, foRe, foIm, w, intFlg, polFlg, n );

figure(fig);
x = 0:(n-1); y = 0:(n-1);
mesh(x, y, R);
xlabel('Column Distance'); ylabel('Row Distance'); zlabel('R');

name_str = csv_name;
pos      = findstr('_', name_str);
if 0 < pos; name_str(pos) = '.'; end

title_str = ['Correlation, '  name_str];
title( title_str );
%
% end script