声振论坛

 找回密码
 我要加入

QQ登录

只需一步,快速开始

查看: 3270|回复: 5

[振动控制] [求助]用Routh判据求系统稳定性,用MATLAB怎么编程

[复制链接]
发表于 2007-10-21 16:56 | 显示全部楼层 |阅读模式

马上注册,结交更多好友,享用更多功能,让你轻松玩转社区。

您需要 登录 才可以下载或查看,没有账号?我要加入

x
用Routh判据求系统稳定性,涉及到不等式的求解

如 A<B-C*D,  已知B,D, 且是常数, C是变量, C=1:20:400,    画出A和C 的关系图

用MATLAB怎么编

[ 本帖最后由 xmwhit 于 2007-10-21 21:18 编辑 ]
回复
分享到:

使用道具 举报

发表于 2007-10-24 15:56 | 显示全部楼层
给出个实例吧
发表于 2007-11-11 01:55 | 显示全部楼层
你给的是系统特征方程式吗?
请教这跟routh判据有什么关系?
发表于 2007-12-13 19:54 | 显示全部楼层
好像有一本书编了这个程序.......,具体忘记了,唉........是关于Matlab在控制中的用法的书.......
发表于 2007-12-21 10:48 | 显示全部楼层
function [rtab,info]=routh0(den)
info=[];
vec1=den(1:2:length(den)); nrT=length(vec1);
vec2=den(2:2:length(den)-1);
rtab=[vec1; vec2, zeros(1,nrT-length(vec2))];
for k=1:length(den)-2,
   alpha(k)=vec1(1)/vec2(1);
   for i=1:length(vec2),
       a3(i)=rtab(k,i+1)-alpha(k)*rtab(k+1,i+1);
   end
   if sum(abs(a3))==0
      a3=polyder(vec2);
      info=[info,'All elements in row ',...
            int2str(k+2) ' are zeros;'];
   elseif abs(a3(1))<eps
      a3(1)=1e-6;
      info=[info,'Replaced first element;'];
   end
   rtab=[rtab; a3, zeros(1,nrT-length(a3))];
   vec1=vec2; vec2=a3;
end

评分

1

查看全部评分

发表于 2011-4-8 15:30 | 显示全部楼层
回复 5 # realone 的帖子

劳驾帮忙逐句解析下,谢谢
您需要登录后才可以回帖 登录 | 我要加入

本版积分规则

QQ|小黑屋|Archiver|手机版|联系我们|声振论坛

GMT+8, 2024-11-24 22:42 , Processed in 0.073082 second(s), 22 queries , Gzip On.

Powered by Discuz! X3.4

Copyright © 2001-2021, Tencent Cloud.

快速回复 返回顶部 返回列表