1 2 345 / 5 页下一页

楼主: ljyxn

[问题求助] 用matlab进行熵值法求解熵权....怎么编程序啊？？？？

[复制链接]

字体大小: 正常放大

谢凌风

0 主题	5 听众	57 积分

升级 54.74%

TA的每日心情

	怒 2012-9-10 05:05

签到天数: 14 天

[LV.3]偶尔看看II

自我介绍: 爱好数学

31^#

发表于 2012-8-12 21:44 |只看该作者

|招呼Ta 关注Ta

好的，有用。

我也说一句

发表

使用道具举报

X.w.j.拽.

6 主题	7 听众	238 积分

升级 69%

TA的每日心情

	难过 2012-10-12 12:39

签到天数: 34 天

[LV.5]常住居民I

自我介绍: 活泼开朗

群组: 学术交流A

群组: 数学建摸协会

群组: 学术交流B

群组: 西安交大数学建模

32^#

发表于 2012-8-13 17:41 |只看该作者 |招呼Ta 关注Ta

我也说一句

发表

使用道具举报

沧海浮萍

3 主题	5 听众	92 积分

升级 91.58%

TA的每日心情

	衰 2013-9-13 17:58

签到天数: 20 天

[LV.4]偶尔看看III

33^#

发表于 2012-9-5 16:56 |只看该作者 |招呼Ta 关注Ta

不过看了大家的评论，怎么觉得代码还是有问题呢

我也说一句

发表

使用道具举报

zhenc

2 主题	7 听众	35 积分

升级 31.58%

TA的每日心情

	无聊 2012-11-15 15:41

签到天数: 5 天

[LV.2]偶尔看看I

自我介绍: 爱学习

群组: 数学建模培训课堂1

34^#

发表于 2012-9-6 20:15 |只看该作者 |招呼Ta 关注Ta

我也说一句

发表

使用道具举报

加拿大

0 主题	5 听众	51 积分

升级 48.42%

TA的每日心情

	开心 2012-9-7 07:26

签到天数: 11 天

[LV.3]偶尔看看II

自我介绍: 热诚，好学，喜欢交朋友

群组: 学术交流A

群组: 学术交流B

35^#

发表于 2012-9-7 19:49 |只看该作者 |招呼Ta 关注Ta

我也说一句

发表

使用道具举报

hock

6 主题	6 听众	350 积分

升级 16.67%

TA的每日心情

	开心 2014-12-4 12:42

签到天数: 18 天

[LV.4]偶尔看看III

群组: 数学建摸协会

群组: 数学建模培训课堂1

36^#

发表于 2012-12-8 13:26 |只看该作者 |招呼Ta 关注Ta

也是来找资源的

我也说一句

发表

使用道具举报

1667156702

21 主题	7 听众	2309 积分

升级 10.3%

TA的每日心情

	奋斗 2016-5-8 10:42

签到天数: 394 天

[LV.9]以坛为家II

群组: Matlab讨论组

群组: 2012第三期美赛培训

群组: 第二届数模基础实训

群组: MCM优秀论文解析专题

37^#

发表于 2013-2-5 23:15 |只看该作者 |招呼Ta 关注Ta

请问有复数怎么解决？

我也说一句

发表

使用道具举报

0且行

1 主题	0 听众	4 积分

升级 80%

该用户从未签到

自我介绍: 东南大学统计系学生

群组: 2013认证赛A题讨论群组

38^#

发表于 2013-5-19 13:42 |只看该作者 |招呼Ta 关注Ta

模糊决策方法：function fuzzy4
clear,clc
m=input('请输入目标数:');
n=input('请输入决策方案数:');
a=zeros(m,n);
while 1
b=input('请输入特征量矩阵:');
[s,t]=size(b);
　if s==m&t==n, break, end
　　disp('输入错误!请核查!!')
end
r=zeros(m,n);
bmax=zeros(m,1);
bmin=zeros(m,1);
disp('请依次选择目标的类型:1-越大越优;0-越小越优:')
for k=1:m
disp('目标:'),disp(k)
o(k)=input('类型:');
if o(k)==1
　　　bmax(k)=max(b(k,

);　　%求特征量矩阵第一行的最大元
　　　r(k,

=b(k,

/bmax(k);
else if o(k)==0
　　　bmin(k)=min(b(k,

);　　　%求特征量矩阵第一行的最小元
　　　r(k,

=(b(k,

/bmin(k)).^ (-1);
else
　　　error('选择错误!')
end
end
end
disp('隶属度矩阵为:'),r
disp('系统的优向量为:')
g=ones(m,1)
disp('系统的次向量为:')
for k=1:m
c(k)=min(r(k,

);
end
b=c(

w=input('请输入评价指标的权重向量:')
p=input('请选择距离:1-为海明距离;2-欧氏距离:')
x=zeros(1,n);　　%初始化
y=zeros(1,n);
for j=1:n
　for i=1:m
　　x(j)=x(j)+(w(i)*abs(r(i,j)-g(i)))^ p;
　　　y(j)=y(j)+(w(i)*abs(r(i,j)-b(i)))^ p;
end
　　z(j)=1+(x(j)/y(j))　(2/p);
v(j)=1/z(j);
end
disp(v(

')
u=sort(v)　　%将向量v的元素按递增排序
disp('方案的优先顺序为:')
for k=n:-1:1　　%将向量u的元素从大到小
for l=1:n　　%逐个与向量v的每个元素比较,
　　if u(k)==v(l)　　%依次找出u中每个元素在V中的位置
　　　disp(l)　　%并输出,即为方案的优先顺序
end
end
end