Octave有趣的错误 - 无法定义功能

时间:2013-11-08 19:01:01

标签: c++ function octave gnu archive

这是我的代码:

我在whiles或ifs之后得到错误,我不知道如何解决它。说出类似的话:“显示所有3669种可能性(y或n)”并开始显示我无需要求的事物列表:p

我必须错误地定义函数但我找不到位置。如果您告诉我问题是什么或我应该如何解决它,那将非常有帮助。

R,Rer和V是向量; pc,dg和cs是数字

function [R,Rer] = er_dig(V,pc,dg,cs) 
i=0;
dg_aux=V;
while (abs(rem(dg_aux,1))!=0)
    dg_aux=dg_aux.*10;
    i++;
endwhile

Rer= (V.*dg)./100 + dg.*(10^(-i));


if (Rer<1)
    Rer_aux=Rer;
    k=0;
    while (abs(rem(Rer_aux,1))>0)
        Rer_aux=Rer_aux.*10;
        k++;
    endwhile

    if (Rer_aux>=10)
        k--;
    endif

    j=1;
    while (j<=dim(V))
        validador=(Rer(j)*(10^(k+cs))-fix(Rer(j)*(10^(k+cs-1)))*10);
        if (validador>=2)
            Rer(j) = (fix(Rer(j)*(10^(k+cs-1))) +1)/(10^(k+cs-1));
        elseif
            Rer(j) = (fix(Rer(j)*(10^(k+cs-1))))/(10^(k+cs-1));
        endif
    j++;
    endwhile


    R=V;
    i=1;
    while (i<=dim(V))
        R(i) = fix(R(i)*10^(k+cs-1))/10^(k+cs-1);
        i++;
    endwhile

elseif
    Rer_aux=Rer;
    k=0;
    while(Rer_aux>1)
        Rer_aux=Rer_aux./10;
        k++;
    endwhile


    j=1;
    while(j<=dim(V))
        validador=(Rer(j)*(10^(-k+cs))-fix(Rer(j)*(10^(-k+cs-1)))*10);
        if(validador>=2)
            Rer(j) = (fix(Rer(j)*(10^(-k+cs))) +1)/(10^(-k+cs));
        elseif
            Rer(j) = (fix(Rer(j)*(10^(k+cs))))/(10^(k+cs));
        endif
    j++;
    endwhile


    R=V;
    i=1;
    while(i<=dim(V))
        R(i) = fix(R(i)*10^(-k+cs))/10^(-k+cs);
        i++;
    endwhile

endif

endfunction可写

1 个答案:

答案 0 :(得分:0)

您是从脚本调用还是复制粘贴?如果您要复制并粘贴并在代码中的任何位置都有双选项卡,则两个选项卡用于自动完成。尝试将该代码放在一个文件中,并从Octave提示符中调用它,指定文件的路径。如果要复制和粘贴代码,请使用空格进行缩进。