function Y=poly2str(X)    
%X是表示一個多項式的向量
%Y多項式的字符串表示
%輸入檢查，如果X不是一個向量則退出
if isvector(X)==0,
    disp('輸入錯誤：輸入X不是一個向量，請輸入一個代表多項式的向量！');
    return;                         %函數返回
end;
Y='';                               %輸出字符串
n=length(X);
for i=1:n,                          %把多項式的每一次冪轉換為字符串
    if(i~=1&&X(i)>0)                %如果是正系數，必須添加‘+’字符             
        Y=[Y '+'];
    end;    
                                    %輸出系數
    if(X(i)==0),                    %如果該次冪系數為0，則不輸出字符串
        continue;
    elseif(X(i)==1&&i~=n),          %如果該次冪系數為1，可以不輸出系數，只輸出x^n
        Y=Y;
    else
        Y=[Y num2str(X(i))];        %其他情況輸出系數
    end;
                                    %輸出x^n
    if(i==n-1),                     %1次冪輸出字符串'x'
        Y=[Y 'x'];
    elseif(i==n),                   %0次冪不輸出x^n
        Y=Y;
    else    
        Y=[Y 'x^' num2str(n-i)];    %其他情況輸出x^n
    end;    
                                    %如果不是最后一項，輸出'+'
end;
if(Y(1)=='+')             %修正如果0次冪為0時，造成字符串末尾有多余的字符串' + '
    Y(1)=[];
end;