jidt/demos/octave/octaveToJavaDoubleArray.m

56 lines
2.0 KiB
Matlab
Executable File

%%
%% Java Information Dynamics Toolkit (JIDT)
%% Copyright (C) 2012, Joseph T. Lizier
%%
%% This program is free software: you can redistribute it and/or modify
%% it under the terms of the GNU General Public License as published by
%% the Free Software Foundation, either version 3 of the License, or
%% (at your option) any later version.
%%
%% This program is distributed in the hope that it will be useful,
%% but WITHOUT ANY WARRANTY; without even the implied warranty of
%% MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
%% GNU General Public License for more details.
%%
%% You should have received a copy of the GNU General Public License
%% along with this program. If not, see <http://www.gnu.org/licenses/>.
%%
% function jDoubleArray = octaveToJavaDoubleArray(octaveArray)
%
% Convert a native octave array to a java double 1D array
%
% Assumes the JIDT jar is already on the java classpath - you will get a
% java classpath error if this is not the case.
%
function jDoubleArray = octaveToJavaDoubleArray(octaveArray)
if (exist ('OCTAVE_VERSION', 'builtin'))
% We're in octave:
% Using 'org.octave.Matrix' is much faster than conversion cell by cell
if (length(octaveArray) > 1)
% Do this the normal way
tmp = javaObject('infodynamics.utils.OctaveMatrix');
tmp.loadDoubleData(octaveArray,[1, length(octaveArray)]);
jDoubleArray = tmp.asDoubleVector();
else
% For length 1 arrays, we need to perform a hack here or else
% java thinks the length-one array is a scalar.
% I thought I had this work once:
% tmp = javaObject('org.octave.Matrix',[octaveArray,octaveArray] ,[1, 1]);
% jDoubleArray = tmp.asDoubleVector();
% but now can't get that to repeat.
% So instead we'll do this the slow way (doesn't matter for one element only)
jDoubleArray = javaArray('java.lang.Double', 1);
jDoubleArray(1) = octaveArray(1);
end
else
% We're in matlab: the native matlab array can be passed to java as is:
jDoubleArray = octaveArray;
end
end