ファイル名:DateNum0.m

function N = datenum0(TIME)
% datenumではMATRIXとして日時の入力が出来ないのでそれが出来るようにしたプログラム
% INPUT     The matrix or vector whose columns are [yyyy mm dd hh mi ss]
% OUTPUT    The day vector that represents serial days where 1 corresponds to 0000-Jan-1.

if nargin ~= 1
    error('[Error] Usage: datenum0([yyyy mm dd hh mi ss])');
elseif size(TIME,2) > 6
    error('The column size of input matrix must be lesser equal 6.');
end
if size(TIME,2) < 6
    TIME = [TIME zeros(size(TIME,1),6-size(TIME,2))];
end
N = datenum(TIME);