使用matlab程序，编写一段简单的一维条形码（EAN13码）编码真伪性验证代码，要求：给定一段一维码编码序列，验证校验码是否正确。 Example：6901234567891 程序运行结果：校验码应该为 2

在MATLAB中，我们可以利用内置函数`eanCheck`来验证EAN13条形码的校验码。以下是一个简单的示例代码，用于输入EAN13码并检查其校验码：

function isValid = verify_ean13(code)
    % EAN13码由前12位数字和最后一位校验码组成
    prefix = code(1:12);
    
    % 检查EAN13码长度
    if length(prefix) ~= 12
        disp('错误：输入的编码不是12位');
        isValid = false;
        return;
    end
    
    % 计算校验码
    calculatedChecksum = mod(sum(10:-2:1 * str2double(prefix)), 10);
    
    % 真实校验码
    expectedChecksum = code(end);
    
    % 验证校验码是否一致
    if calculatedChecksum == expectedChecksum
        disp('校验码正确');
        isValid = true;
    else
        disp(['校验码错误，计算得到的校验码为 ', num2str(calculatedChecksum)]);
        isValid = false;
    end
end

% 测试例子
code_to_verify = '6901234567891';
isValid = verify_ean13(code_to_verify);

%