Неожиданный результат при расчете средней кривизны в MatLab

Question

Я провожу моделирование белково-мембранной системы и хочу определить степень деформации мембраны.Во время симуляции я усреднил поверхность мембраны на сетке, в результате чего получился текстовый файл с тремя столбцами, содержащий точки x, y и z мембраны.Затем я преобразую эту информацию в поверхность сетки в Matlab, которую затем использую для вычисления гауссовой и / или средней кривизны.Проблема в том, что я получаю аналогичные значения в самом начале симуляции, когда поверхность (мембрана) очень плоская, и в конце, когда она полностью деформируется.Если я не понимаю, что такое кривизна, это не правильно, и я считаю, что я делаю что-то не так в части Matlab этого процесса.Вот сценарий, в котором я зацикливаюсь на многих кадрах (каждый из которых представляет собой отдельный файл, содержащий координаты x, y, z усредненной мембраны) и преобразую его в сетку:

https://pastebin.com/reqWAz01

for i = 0:37

file = strcat('cg-topmem_pos-', num2str(i), '.out');
A = load(file);
x = A(:,1);
y = A(:,2);
z = A(:,3);

xv = linspace(min(x), max(x), 20);
yv = linspace(min(y), max(y), 20);
[X,Y] = meshgrid(xv, yv);
Z = griddata(x,y,z,X,Y);

[K,H,Pmax,Pmin] = surfature(X,Y,Z);
M = max(max(H))
if i == 0
    fileID = fopen('Average2-NoTMHS-5nmns.txt', 'a');
    fprintf(fileID, '%f %f\n',M);
    fclose(fileID);
else
    fileID = fopen('Average2-NoTMHS-5nmns.txt', 'a');
    fprintf(fileID, '\n%f %f\n',M);
    fclose(fileID);
end

end    

Затем с помощью следующего расчета кривизны:

https://pastebin.com/5D21PdBQ

function [K,H,Pmax,Pmin] = surfature(X,Y,Z),
% SURFATURE -  COMPUTE GAUSSIAN AND MEAN CURVATURES OF A SURFACE
%   [K,H] = SURFATURE(X,Y,Z), WHERE X,Y,Z ARE 2D ARRAYS OF POINTS ON THE
%   SURFACE.  K AND H ARE THE GAUSSIAN AND MEAN CURVATURES, RESPECTIVELY.
%   SURFATURE RETURNS 2 ADDITIONAL ARGUEMENTS,
%   [K,H,Pmax,Pmin] = SURFATURE(...), WHERE Pmax AND Pmin ARE THE MINIMUM
%   AND MAXIMUM CURVATURES AT EACH POINT, RESPECTIVELY.
% First Derivatives
[Xu,Xv] = gradient(X);
[Yu,Yv] = gradient(Y);
[Zu,Zv] = gradient(Z);
% Second Derivatives
[Xuu,Xuv] = gradient(Xu);
[Yuu,Yuv] = gradient(Yu);
[Zuu,Zuv] = gradient(Zu);
[Xuv,Xvv] = gradient(Xv);
[Yuv,Yvv] = gradient(Yv);
[Zuv,Zvv] = gradient(Zv);
% Reshape 2D Arrays into Vectors
Xu = Xu(:);   Yu = Yu(:);   Zu = Zu(:); 
Xv = Xv(:);   Yv = Yv(:);   Zv = Zv(:); 
Xuu = Xuu(:); Yuu = Yuu(:); Zuu = Zuu(:); 
Xuv = Xuv(:); Yuv = Yuv(:); Zuv = Zuv(:); 
Xvv = Xvv(:); Yvv = Yvv(:); Zvv = Zvv(:); 
Xu          =   [Xu Yu Zu];
Xv          =   [Xv Yv Zv];
Xuu         =   [Xuu Yuu Zuu];
Xuv         =   [Xuv Yuv Zuv];
Xvv         =   [Xvv Yvv Zvv];
% First fundamental Coeffecients of the surface (E,F,G)
E           =   dot(Xu,Xu,2);
F           =   dot(Xu,Xv,2);
G           =   dot(Xv,Xv,2);
m           =   cross(Xu,Xv,2);
p           =   sqrt(dot(m,m,2));
n           =   m./[p p p]; 
% Second fundamental Coeffecients of the surface (L,M,N)
L           =   dot(Xuu,n,2);
M           =   dot(Xuv,n,2);
N           =   dot(Xvv,n,2);
[s,t] = size(Z);
% Gaussian Curvature
K = (L.*N - M.^2)./(E.*G - F.^2);
K = reshape(K,s,t);
% Mean Curvature
H = (E.*N + G.*L - 2.*F.*M)./(2*(E.*G - F.^2));
H = reshape(H,s,t);
% Principal Curvatures
Pmax = H + sqrt(H.^2 - K);
Pmin = H - sqrt(H.^2 - K);

Любая помощь будет принята с благодарностью.Я боюсь, что существует некоторая проблема между тем, как создается сетка, и тем, как рассчитывается кривизна, но я не разбираюсь в matlab и могу использовать некоторую помощь.Большое спасибо.