请用matlab编写实现一维搜索任意给定函数求最优解的程序。要求使用进退法确定初始搜索区间，再利用黄金分割法确定最优解。

在MATLAB中，我们可以结合进退法（二分搜索）和黄金分割法来优化一维函数的最小值搜索。首先，我们通过进退法确定一个大致的搜索区间，然后利用黄金分割法进一步精确搜索。这里是一个简单的示例：

% 定义一元函数，这里假设是f(x) = x^2 - 10 * sin(x)
fun = @(x) x.^2 - 10 * sin(x);

% 使用进退法确定初始搜索区间
initialInterval = [-5, 5]; % 假设我们从[-5, 5]开始搜索
nIterations = 10; % 进步次数
left = initialInterval(1);
right = initialInterval(2);
for i = 1:nIterations
    mid = (left + right) / 2; % 计算中间点
    if fun(mid) < fun(left) && fun(mid) < fun(right) % 如果中间值是最优解
        right = mid;
    else
        left = mid;
    end
end

% 利用黄金分割法进一步精确搜索
goldenRatio = (sqrt(5) - 1) / 2; % 黄金分割比例
while abs(right - left) > goldenRatio * abs(right)
    if fun(left) <= fun(right)
        betterLeft = (left + right) * goldenRatio;
        if fun(betterLeft) < fun(right)
            right = betterLeft;
        else
            left = right;
        end
    else
        betterRight = (left + right) * goldenRatio;
        if fun(left) < fun(betterRight)
            right = betterRight;
        else
            left = betterLeft;
        end
    end
end

% 最终的最优解
optimalSolution = (left + right) / 2;
fprintf('最优解：%.4f\n', optimalSolution);