QQ登录

只需要一步,快速开始

 注册地址  找回密码
查看: 5725|回复: 4
打印 上一主题 下一主题

把Matlab的数值矩阵输出成Latex语句,希望对您有帮助!

[复制链接]
字体大小: 正常 放大
lingo8        

50

主题

15

听众

823

积分

  • TA的每日心情
    慵懒
    2014-8-7 23:01
  • 签到天数: 3 天

    [LV.2]偶尔看看I

    自我介绍
    痴LaTeX

    新人进步奖

    群组数学建模培训课堂1

    跳转到指定楼层
    1#
    发表于 2009-2-4 22:23 |只看该作者 |倒序浏览
    |招呼Ta 关注Ta
    帖子来源:

    http://www.ilovematlab.cn/thread-13775-1-1.html

    近来在写一份note,要经常写上Matlab算出来的矩阵,由本我是用Latex来编写,所以需要把Matlab的数值矩阵转成Latex语句。Matlab中看来没有把数值矩阵转成Latex语句的程序,而只有关于符号矩阵的程序(其实是Maple的),所以我就自己写了一个。我的程序可能写得很烂,但还能凑合用一用。


    % 数值矩阵输出成Latex代码
    % A为矩阵,precision为输出精度
    % 如输入:
    % >> a = [1 2 3; 4 5 6; 7 8 9];
    % >> latex2(a)
    % \left(
    %  \begin{array}{ccc}
    %   1 & 2 & 3 \\
    %   4 & 5 & 6 \\
    %   7 & 8 & 9 \\
    %  \end{array}
    % \right)
    function f = latex2(A, precision)
    % 没输入精度参数时,默认精度为小数后4位
    if nargin == 1
        precision = '4';
    else
        precision = int2str(precision);
    end
    % 定义单一元素输出格式
    out_num = [' %0.' precision 'f &'];
    % 用作整数输出判断
    z = zeros(1, str2num(precision) + 1);
    z(1) = '.';
    z(2 : end) = '0';
    z = char(z);
    % 求矩阵大小
    [r c] = size(A);
    nc = zeros(1, c);
    nc( = 99;  % 存放character c
    % 生成第一句Latex语句
    out = sprintf('\\left(\n\t\\begin{array}{%s}', char(nc));
    % 二重循环,用作生成整个矩阵的Latex语句
    for i = 1 : r
        out = [out sprintf('\n\t')]; % 换行
        for j = 1 : c
            temp = sprintf(out_num, A(i, j));
            % 小数位皆为零时,把数取整。如1.0001取为1
            dot_position = find(temp == '.');
            if temp(dot_position : end - 2) == z
                temp = temp(1 : dot_position - 1);
                temp = [temp ' &'];
                % 要取整时,如有负号,则必须丢掉
                if temp(2) == '-'
                   temp = [temp(1) temp(3 : end)];
                end
            end
            out = [out temp];
        end
        % 丢掉最后的'&'号
        out = out(1 : end - 1);
        % 行末加上'\\'号
        out = [out '\\'];
    end
    % 加上最后一句结束代码
    out = [out sprintf('\n\t\\end{array}\n\\right)')];
    f = out;
    zan
    转播转播0 分享淘帖0 分享分享0 收藏收藏0 支持支持0 反对反对0 微信微信

    0

    主题

    4

    听众

    29

    积分

    升级  25.26%

    该用户从未签到

    新人进步奖

    回复

    使用道具 举报

    0

    主题

    4

    听众

    29

    积分

    升级  25.26%

    该用户从未签到

    新人进步奖

    回复

    使用道具 举报

    yangwenli        

    7

    主题

    4

    听众

    396

    积分

    升级  32%

    该用户从未签到

    新人进步奖

    回复

    使用道具 举报

    3

    主题

    3

    听众

    397

    积分

    升级  32.33%

  • TA的每日心情
    奋斗
    2013-1-17 15:23
  • 签到天数: 5 天

    [LV.2]偶尔看看I

    新人进步奖 最具活力勋章

    回复

    使用道具 举报

    您需要登录后才可以回帖 登录 | 注册地址

    qq
    收缩
    • 电话咨询

    • 04714969085
    fastpost

    关于我们| 联系我们| 诚征英才| 对外合作| 产品服务| QQ

    手机版|Archiver| |繁體中文 手机客户端  

    蒙公网安备 15010502000194号

    Powered by Discuz! X2.5   © 2001-2013 数学建模网-数学中国 ( 蒙ICP备14002410号-3 蒙BBS备-0002号 )     论坛法律顾问:王兆丰

    GMT+8, 2025-11-25 14:03 , Processed in 1.103775 second(s), 74 queries .

    回顶部