完善资料让更多小伙伴认识你,还能领取20积分哦, 立即完善>
|
|
相关推荐
1个回答
|
|
main_lip1m
% clear;clc A = [ 0 1 0 0; 0 0 0 0; 0 0 0 1; 0 0 29.493 0]; B = [ 0 1 0 3]'; C = [ 1 0 0 0; 0 0 1 0]; D = [0]; Q11 = 1000; %代表小车位置的权重 Q22 = 0; %小车速度的权重 Q33 = 200; %代表摆杆角度的权重 Q44 = 0; %摆杆角速度的权重 % 当Q11为100时,Q33取1,10或100对曲线影响不大,好像是代表摆杆角度权重的值不用取太大, % 太大了对结果也没有更大的贡献,待验证 Q = [Q11 0 0 0; 0 Q22 0 0; 0 0 Q33 0; 0 0 0 Q44]; R = 1; %控制能量的限制 K = lqr(A,B,Q,R) sim('lip_lqr.slx',4); PHI = C/(-A+B*K)*B % t_q11_10 = Time; % ang_q11_10 = Ang*180/pi; % pos_q11_10 = Pos; % t_q22_1000 = Time; % ang_q22_1000 = Ang*180/pi; % pos_q22_1000 = Pos; % t_q33_1000 = Time; ang_q33_1000 = Ang*180/pi; pos_q33_1000 = Pos; % t_q44_1000 = Time; % ang_q44_1000 = Ang*180/pi; % pos_q44_1000 = Pos; figure(1) set(gcf,'Units','centimeters','Position',[10 10 5*1.45 4*1.45]);%设置图片大小为 5*1.45cm× 4*1.45cm plot(Time, Ang*180/pi, 'b'); xlabel('t(s)'); ylabel('theta (°)' ); title('角度变化曲线(仿真)') hold grid on; figure(2) set(gcf,'Units','centimeters','Position',[20 10 5*1.45 4*1.45]);%设置图片大小为 5*1.45cm× 4*1.45cm plot(Time, Pos, 'b'); xlabel('t(s)'); ylabel('x (m)'); title('位置变化曲线(仿真)') hold on grid on; % Ac = [(A-B*K)]; % % Bc = B; % Cc = [C]; % Dc = [D]; % Cn = [1 0 0 0 ]; % % s = size(A,1); % Z = [zeros(1,s) 1]; % % N = inv([A,B;Cn,0])*Z'; % Nx = N(1:s); % Nu = N(1+s); % Nbar = Nu + K*Nx; % % Bcn = [Nbar*B]; % x0 = [0 0 10*pi/180 0]; % T = 0:0.01:10; % U = zeros(size(T)); % [Y,X] = lsim(Ac,Bcn,Cc,Dc,U,T,x0); % xpos = Y(:,1); % xangle = Y(:,2); % % figure(20) % plot(T,xpos,':'); % grid on % title('位置变化曲线') % xlabel('t (s)'); ylabel('x (m)') % figure(10) % plot(T,xangle*180/pi,'--') % grid on % title('角度变化曲线') % xlabel('t (s)'); ylabel('theta (°)') change,m function y = change(u) % if u >= 0 % y = u - 2*pi*ceil(u/2/pi); % else % y = u - 2*pi*floor(u/2/pi); % end % y = u - floor(u/2/pi)*2*pi - pi; if u > pi y = u - ceil((u-pi)/2/pi)*2*pi; elseif u < -pi y = u - floor((u+pi)/2/pi)*2*pi; else y = u; end lqr1_funtion.m function dw = lqr1_funtion(u) I = 0.0034; m = 0.109; l = 0.25; g = 9.8; uu = u(1); phi = u(2); dw = ( m*g*l*sin(phi)+m*l*uu*cos(phi) )/( I+m*l*l ); lip_lqr.slx 部分结果展示: |
|
|
|
只有小组成员才能发言,加入小组>>
2371 浏览 0 评论
8683 浏览 4 评论
36409 浏览 18 评论
4967 浏览 0 评论
24179 浏览 34 评论
1336浏览 2评论
1585浏览 1评论
1953浏览 1评论
1399浏览 0评论
1834浏览 0评论
小黑屋| 手机版| Archiver| 电子发烧友 ( 湘ICP备2023018690号 )
GMT+8, 2024-11-10 16:46 , Processed in 0.939828 second(s), Total 45, Slave 40 queries .
Powered by 电子发烧友网
© 2015 bbs.elecfans.com
关注我们的微信
下载发烧友APP
电子发烧友观察
版权所有 © 湖南华秋数字科技有限公司
电子发烧友 (电路图) 湘公网安备 43011202000918 号 电信与信息服务业务经营许可证:合字B2-20210191 工商网监 湘ICP备2023018690号