• 设为首页
  • 点击收藏
  • 手机版
    手机扫一扫访问
    迪恩网络手机版
  • 关注官方公众号
    微信扫一扫关注
    公众号

matlab练习程序(dubins曲线)

原作者: [db:作者] 来自: [db:来源] 收藏 邀请

dubins曲线是在满足曲率约束和规定的始端和末端的切线方向的条件下,连接两点的最短路径。

计算方法:

1. 给定起始终点位置和方向,并且设定最小转弯半径r。

2. 坐标转换,以起始点作为原点,起始点到结束点向量作为x轴,其垂直方向作为y轴构建新坐标系,在新坐标系下求解路径。

3. 根据论文《Classification of the Dubins set》中六个公式计算六种情况下起点到终点的距离,论文参考参考网址1。

4. 选择最短的距离所代表的转弯方向并计算路径中间所有的点。

5. 连接所有点得到从起点到终点的完整路径。

六种情况分为\'LSL\',\'LSR\',\'RSL\',\'RSR\',\'RLR\',\'LRL\'。

LSL:

LSR:

RSL:

RSR:

RLR:

LRL:

matlab代码如下:

main.m:

clear all;
close all;
clc;

r=5;

%LSL
p1 = [10 10 0*pi/180];
p2 = [15 15 0*pi/180];

%LSR
% p1 = [10 10 0*pi/180];
% p2 = [25 25 0*pi/180];
% 
% %RSL
% p1 = [10 10 0*pi/180];
% p2 = [25 -25 0*pi/180];
% 
% %RSR
% p1 = [0 0 90*pi/180];
% p2 = [15 15 0*pi/180];
% 
% %RLR
% p1 = [10 10 0*pi/180];
% p2 = [15 15 180*pi/180];
% 
% %LRL
% p1 = [10 10 180*pi/180];
% p2 = [15 15 0*pi/180];

dx = p2(1) - p1(1);
dy = p2(2) - p1(2);
d = sqrt( dx^2 + dy^2 ) / r;

theta = mod(atan2( dy, dx ), 2*pi);
alpha = mod((p1(3) - theta), 2*pi);
beta  = mod((p2(3) - theta), 2*pi);
L = zeros(6,4);
L(1,:) = LSL(alpha,beta,d);
L(2,:) = LSR(alpha,beta,d);
L(3,:) = RSL(alpha,beta,d);
L(4,:) = RSR(alpha,beta,d);
L(5,:) = RLR(alpha,beta,d);
L(6,:) = LRL(alpha,beta,d);
[~,ind] = min(L(:,1));

types=[\'LSL\';\'LSR\';\'RSL\';\'RSR\';\'RLR\';\'LRL\'];
p_start = [0  0  p1(3)];

mid1 = dubins_segment(L(ind,2),p_start,types(ind,1));
mid2 = dubins_segment(L(ind,3), mid1,types(ind,2));

path=[];
for step=0:0.05:L(ind,1)*r
    t = step / r;
    
    if( t < L(ind,2) )
        end_pt = dubins_segment( t, p_start,types(ind,1));
    elseif( t < L(ind,2)+L(ind,3) )
        end_pt = dubins_segment( t-L(ind,2),mid1,types(ind,2));
    else
        end_pt = dubins_segment( t-L(ind,2)-L(ind,3),mid2,types(ind,3));
    end
    
    end_pt(1) = end_pt(1) * r + p1(1);
    end_pt(2) = end_pt(2) * r + p1(2);
    end_pt(3) = mod(end_pt(3), 2*pi);
    
    path=[path;end_pt];
end

plot(p1(1),p1(2),\'ro\');
hold on;
quiver(p1(1),p1(2),2*cos(p1(3)),2*sin(p1(3)));
plot(p2(1),p2(2),\'r*\');
quiver(p2(1),p2(2),2*cos(p2(3)),2*sin(p2(3)));
plot(path(:,1),path(:,2),\'b\');
axis equal;

dubins_segment.m:

function seg_end = dubins_segment(seg_param, seg_init, seg_type)
    if( seg_type == \'L\' ) 
        seg_end(1) = seg_init(1) + sin(seg_init(3)+seg_param) - sin(seg_init(3));
        seg_end(2) = seg_init(2) - cos(seg_init(3)+seg_param) + cos(seg_init(3));
        seg_end(3) = seg_init(3) + seg_param;
    elseif( seg_type == \'R\' )
        seg_end(1) = seg_init(1) - sin(seg_init(3)-seg_param) + sin(seg_init(3));
        seg_end(2) = seg_init(2) + cos(seg_init(3)-seg_param) - cos(seg_init(3));
        seg_end(3) = seg_init(3) - seg_param;
    elseif( seg_type == \'S\' ) 
        seg_end(1) = seg_init(1) + cos(seg_init(3)) * seg_param;
        seg_end(2) = seg_init(2) + sin(seg_init(3)) * seg_param;
        seg_end(3) = seg_init(3);
    end
end

LSL.m:

function L = LSL(alpha,beta,d)
tmp0 = d + sin(alpha) - sin(beta);
p_squared = 2 + (d*d) -(2*cos(alpha - beta)) + (2*d*(sin(alpha) - sin(beta)));
if( p_squared < 0 )
    L = [inf inf inf inf];
else
    tmp1 = atan2( (cos(beta)-cos(alpha)), tmp0 );
    t = mod((-alpha + tmp1 ), 2*pi);
    p = sqrt( p_squared );
    q = mod((beta - tmp1 ), 2*pi);
    L=[t+p+q t p q];
end

end

LSR.m:

function L = LSR(alpha,beta,d)
p_squared = -2 + (d*d) + (2*cos(alpha - beta)) + (2*d*(sin(alpha)+sin(beta)));
if( p_squared < 0 )
    L = [inf inf inf inf];
else
    p    = sqrt( p_squared );
    tmp2 = atan2( (-cos(alpha)-cos(beta)), (d+sin(alpha)+sin(beta)) ) - atan2(-2.0, p);
    t    = mod((-alpha + tmp2), 2*pi);
    q    = mod(( -mod((beta), 2*pi) + tmp2 ), 2*pi);
    L=[t+p+q t p q];
end
end

RSL.m:

function L = RSL(alpha,beta,d)
p_squared = (d*d) -2 + (2*cos(alpha - beta)) - (2*d*(sin(alpha)+sin(beta)));
if( p_squared< 0 )
    L = [inf inf inf inf];
else
    p    = sqrt( p_squared );
    tmp2 = atan2( (cos(alpha)+cos(beta)), (d-sin(alpha)-sin(beta)) ) - atan2(2.0, p);
    t    = mod((alpha - tmp2), 2*pi);
    q    = mod((beta - tmp2), 2*pi);
    L=[t+p+q t p q];
end
end

RSR.m:

function L = RSR(alpha,beta,d)
tmp0 = d-sin(alpha)+sin(beta);
p_squared = 2 + (d*d) -(2*cos(alpha - beta)) + (2*d*(sin(beta)-sin(alpha)));
if( p_squared < 0 )
    L = [inf inf inf inf];
else
    tmp1 = atan2( (cos(alpha)-cos(beta)), tmp0 );
    t = mod(( alpha - tmp1 ), 2*pi);
    p = sqrt( p_squared );
    q = mod(( -beta + tmp1 ), 2*pi);
    L=[t+p+q t p q];
end
end

RLR.m:

function L = RLR(alpha,beta,d)
tmp_rlr = (6. - d*d + 2*cos(alpha - beta) + 2*d*(sin(alpha)-sin(beta))) / 8.;
if( abs(tmp_rlr) > 1)
    L = [inf inf inf inf];
else
    p = mod(( 2*pi - acos( tmp_rlr ) ), 2*pi);
    t = mod((alpha - atan2( cos(alpha)-cos(beta), d-sin(alpha)+sin(beta) ) + mod(p/2, 2*pi)), 2*pi);
    q = mod((alpha - beta - t + mod(p, 2*pi)), 2*pi);
    L=[t+p+q t p q];
end
end

LRL.m:

function L = LRL(alpha,beta,d)
tmp_lrl = (6. - d*d + 2*cos(alpha - beta) + 2*d*(- sin(alpha) + sin(beta))) / 8.;
if( abs(tmp_lrl) > 1)
    L = [inf inf inf inf];
else
    p = mod(( 2*pi - acos( tmp_lrl ) ), 2*pi);
    t = mod((-alpha - atan2( cos(alpha)-cos(beta), d+sin(alpha)-sin(beta) ) + p/2), 2*pi);
    q = mod((mod(beta, 2*pi) - alpha -t + mod(p, 2*pi)), 2*pi);
    L=[t+p+q t p q];
end
end

参考:

https://www.ixueshu.com/document/69acbaea39bf8204318947a18e7f9386.html

https://github.com/EwingKang/Dubins-Curve-For-MATLAB


鲜花

握手

雷人

路过

鸡蛋
该文章已有0人参与评论

请发表评论

全部评论

专题导读
上一篇:
Delphi笔记(GL_Scene安装及简单使用)发布时间:2022-07-18
下一篇:
Delphi与DirectX之DelphiX(28):TDIB.Emboss;发布时间:2022-07-18
热门推荐
阅读排行榜

扫描微信二维码

查看手机版网站

随时了解更新最新资讯

139-2527-9053

在线客服(服务时间 9:00~18:00)

在线QQ客服
地址:深圳市南山区西丽大学城创智工业园
电邮:jeky_zhao#qq.com
移动电话:139-2527-9053

Powered by 互联科技 X3.4© 2001-2213 极客世界.|Sitemap