【matlab有偿编程】机器人避障路径规划,最优轨迹寻优源代码程序.pdf

【matlab有偿编程】机器人避障路径规划,最优轨迹寻优源代码程序.pdf

  1. 1、本文档共4页,可阅读全部内容。
  2. 2、有哪些信誉好的足球投注网站(book118)网站文档一经付费(服务费),不意味着购买了该文档的版权,仅供个人/单位学习、研究之用,不得用于商业用途,未经授权,严禁复制、发行、汇编、翻译或者网络传播等,侵权必究。
  3. 3、本站所有内容均由合作方或网友上传,本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺!文档内容仅供研究参考,付费前请自行鉴别。如您付费,意味着您自己接受本站规则且自行承担风险,本站不退款、不进行额外附加服务;查看《如何避免下载的几个坑》。如果您已付费下载过本站文档,您可以点击 这里二次下载
  4. 4、如文档侵犯商业秘密、侵犯著作权、侵犯人身权等,请点击“版权申诉”(推荐),也可以打举报电话:400-050-0827(电话支持时间:9:00-18:30)。
查看更多
【matlab有偿编程】机器人避障路径规划,最优轨迹寻优源代码程序

%SVM 神经网络求解机械手逆运动学 %SVM 神经网络求解机械手逆运动学 clc clear close all load Test1 p q t r %q 是角度6 行,p 是位姿 % % 产生训练样本与测试样本 %p=p([2,4,6],:);%只看前4 个角度 p=p(1:end-1,:,:); %将最后一行去掉 q=q; %j=length(q); for i=1:200 pp(:,i)=reshape(p(:,:,i),12,1);%将原来的单个三维轨迹矩阵变换成一列,使得输入成为一个 12 行 %qqq(:,i)=RPY(qq(:,i));%转换成RPY 表示方式,将输入变成6 个 end X=pp(:,1:200); Xt=pp(:,151:200); Y=q(:,1:200); Yt=q(:,151:200); % % 参数设置 type = f; kernel = RBF_kernel; gam =100 ;%602572453.6492; % Regularization parameter 正则化参数。原先是 100 sig2=0.01;%329.5513877866; % Kernel parameter 核参数 (bandwidth in the case of the RBF_kernel(0.01) % igam=10; % isig2=0.01; % costfun = rcrossvalidate; % costfun_args = {X,Y,10}; % optfun = gridsearch; %[gam,sig2,cost] = tunelssvm({X,Y,type,igam,isig2,kernel}); % 模型参数优化 ,每一个输 出都对应一组gam、sig2. model = initlssvm(X,Y,type,gam,sig2,kernel); % 模型初始化 % % 交叉验证优化参数 % costfun = rcrossvalidate; % costfun_args = {X,Y,10}; % optfun = gridsearch; % model = tunelssvm(model,[],optfun,{},costfun,costfun_args); % 模型参数优化 % % 训练与测试 model = trainlssvm(model); % 训练 Yd= simlssvm(model,Xt); % 回归 % % 结果作图 %plot(1:length(Yt),Yt(:,1),r+:,1:length(Yd),Yd(:,1),bo:) figure(1) plot(Yt(:,4),g,LineWidth,2); hold on; plot(Yd(:,4),b,LineWidth,2); grid on; xlabel(测试样本数);ylabel(角度); legend(期望值,求解值) figure(2) error=Yt-Yd; plot(error) title(误差曲线);grid on; xlabel(测试样本数);ylabel(误差/rad); %末端轨迹比较图 a1=fkine(r,Yd*pi/180); figure(2) plot3(squeeze(a1(1,4,:)),squeeze(a1(2,4,:)),squeeze(a1(3,4,:)),r); hold on; a1=fkine(r,Yt*pi/180); figure(2) plot3(squeeze(a1(1,4,:)),squeeze(a1(2,4,:)),squeeze(a1(3,4,:)),r); hold on; plot3(squeeze(p(1,4,:)),squeeze(p(2,4,:)),squeeze(p(3,4,:)),b);%轨迹的三维图 title(机械手末端轨迹跟踪效果); legend(输出的轨迹,期望的轨迹); grid on; % plot3(squeeze(p(1,4,151:201)),squeeze(p(2,4,151:201)),squeeze(p(3,4,151:201)),g);% 轨迹的 三维图 % title(机械手末端轨迹跟踪效果); % l

文档评论(0)

xjj2017 + 关注
实名认证
内容提供者

该用户很懒,什么也没介绍

1亿VIP精品文档

相关文档