center cartesian coordinates THIS IS NO USER FUNCTION
0001 function [dataX, dataY, centerPoint] = centerCart(dataX, dataY) 0002 % center cartesian coordinates 0003 % 0004 % THIS IS NO USER FUNCTION 0005 0006 % The elk-library: convex geometry applied to crystallization modeling. 0007 % Copyright (C) 2012 Alexander Reinhold 0008 % 0009 % This program is free software: you can redistribute it and/or modify it 0010 % under the terms of the GNU General Public License as published by the 0011 % Free Software Foundation, either version 3 of the License, or (at your 0012 % option) any later version. 0013 % 0014 % This program is distributed in the hope that it will be useful, but 0015 % WITHOUT ANY WARRANTY; without even the implied warranty of 0016 % MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU 0017 % General Public License for more details. 0018 % 0019 % You should have received a copy of the GNU General Public License along 0020 % with this program. If not, see <http://www.gnu.org/licenses/> 0021 0022 %% info 0023 % Occasionally, plain circles are fittet to the boundary data. For these 0024 % cases, it is beneficial to have the data centered, like here. 0025 % The original requirement of this step is to ensure that the origin is 0026 % inside of the boundary curve. 0027 0028 %% yeah 0029 centerPoint = -1*[mean(dataX); mean(dataY)]; 0030 dataX = dataX + centerPoint(1); 0031 dataY = dataY + centerPoint(2);