如何输出矩阵尺寸及其内容？

Question

是否有可能使GNU Octave与其内容一起输出矩阵尺寸？例如,它应该产生smth.像这样:

octave:1> X = [1 2; 3 4]

X [2x2] =

   1   2
   3   4


octave:2> X(1,:)

ans [1x2] =

   1   2

Answer 1

在MATLAB中,使用以下内容在路径中display.m名为@doublesomewhere 的文件夹中创建:

function display(v)
name = inputname(1);
if isempty(name)
    name = 'ans';
end
s = num2cell(size(v));
fprintf('\n%s [%d%s] =\n\n', name, s{1}, sprintf('x%d', s{2:end}));
builtin('disp', v);
end

这样,您可以覆盖display类的方法double,并获得您所描述的内容.但是,这不适用于其他类int8,logical或cell.您必须覆盖您感兴趣的所有类的方法.示例:

>> A=ones(2,2,2)

A [2x2x2] =

(:,:,1) =
     1     1
     1     1
(:,:,2) =
     1     1
     1     1

Answer 2

虽然Mohsen的答案确实完成了这项工作,但我觉得单独的m文件对于此目的来说有点过分(特别是如果你不想让你的目录与其他m文件混乱).我建议使用本地匿名函数单行代码(让我们命名dispf),所以这里是它的演变阶段:)

我想出的基本匿名功能是:

dispf = @(x)fprintf('%s =\n\n%s\n', inputname(1), disp(x));

这当然等同于输入语句后命令窗口中的输出(当然不是以分号结尾).好吧,差不多......因为如果inputname返回一个空字符串,它就不会打印'ans'(它应该).但这可以纠正:

dispf = @(x)fprintf('%s=\n\n%s\n', ...
    regexprep([inputname(1), ' '], '^ $', 'ans '), ...
    disp(x));

这基本上regexprep用于匹配空字符串并替换它'ans'.最后,我们在变量名后附加维:

dispf = @(x)fprintf('%s%s =\n\n%s\n', ...
    regexprep([inputname(1), ' '], '^ $', 'ans '), ...
    strrep(mat2str(size(x)), ' ', 'x'), ...
    disp(x));

现在你可以将这个单行插入任何脚本,而无需额外的m文件!

例

只是证明它有效:

dispf = @(x)fprintf('%s%s =\n\n%s\n', ...
    regexprep([inputname(1), ' '], '^ $', 'ans '), ...
    strrep(mat2str(size(x)), ' ', 'x'), ...
    disp(x));

A = [1 2; 3 4];
dispf(A)
dispf(A(1, :))

结果如预期:

A [2x2] =

   1   2
   3   4

ans [1x2] =

   1   2

Answer 3

我不知道它是否适用于Octave,但是在MATLAB中你可以使用format debug命令并获得数组的尺寸以及更多:

>> format debug
>> X = [1 2; 3 4]

X =


Structure address = 7d19498 
m = 2
n = 2
pr = 373bafa0 
pi = 0
     1     2
     3     4