Mercurial > repos > public > sbplib
view findFieldWidth.m @ 887:50d5a3843099 feature/timesteppers
Rename package rk4 to rk
author | Vidar Stiernström <vidar.stiernstrom@it.uu.se> |
---|---|
date | Thu, 15 Nov 2018 16:42:58 -0800 |
parents | 30ae48efc7ae |
children |
line wrap: on
line source
% Calculates the maximum field width needed width fprintf for a given format fmt for the values in A % A = [1.13232 10.233 1.1]; % width = findFieldWidth('%.2f',A); % Gives wdith = 5 function width = findFieldWidth(fmt, A) width = 0; for i = 1:numel(A) elem = A(i); if iscell(elem) elem = elem{1}; end str = sprintf(fmt,elem); width = max(width,length(str)); end end