function code = m21_bestCode21(R,t,data)
%% 获得到达序列
u = 0;
isB = 0;
uq = zeros(1,2);
for j=1:size(R,1)
    if R(j,t)==1
        uq(1) = j;
    elseif R(j,t)==710
        uq(2) = j;
    end
end
if uq(1)==0 && uq(2)==0
    u = 0;
elseif uq(1)==0 && uq(2)~=0
    u = uq(2);
elseif uq(1)~=0 && uq(2)==0
    u = uq(1);
else
    tt = t;
    for i=t:-1:1
        for j=1:size(uq,1)
            if uq(j)~=0 && R(uq(j),i)~=1
                if i<tt
                    u = j;
                    tt = i;
                end
            end
        end
    end
end
if u==0
    code = 13;
    return;
end

power = data.power{u};
drive = data.drive{u};
%% 转移车辆
if strcmp(power,'燃油') && strcmp(drive,'两驱')
    code = 3 + isB*6;
elseif strcmp(power,'燃油') && strcmp(drive,'四驱')
    code = 5 + isB*6;
elseif strcmp(power,'混动') && strcmp(drive,'两驱')
    code = 4 + isB*6;
elseif strcmp(power,'混动') && strcmp(drive,'四驱')
    code = 2 + isB*6;
end
end