楼主: sunou12345
1073 0

[实际应用] 互熵。。。 [推广有奖]

  • 20关注
  • 9粉丝

已卖:353份资源

副教授

23%

还不是VIP/贵宾

-

威望
0
论坛币
3914 个
通用积分
22.8156
学术水平
5 点
热心指数
5 点
信用等级
4 点
经验
103 点
帖子
430
精华
0
在线时间
897 小时
注册时间
2009-11-20
最后登录
2025-8-22

楼主
sunou12345 发表于 2016-6-21 16:35:58 |AI写论文

+2 论坛币
k人 参与回答

经管之家送您一份

应届毕业生专属福利!

求职就业群
赵安豆老师微信:zhaoandou666

经管之家联合CDA

送您一个全额奖学金名额~ !

感谢您参与论坛问题回答

经管之家送您两个论坛币!

+2 论坛币
互熵。。就是KL距离。。
下面针对离散序列


R里面加载程序包entropy
library("entropy")
先把数据变成csv格式,放在c盘里,然后导入数据
mydata <- read.csv("c:/mydata.csv", 1)

freqs1=c(概率1,概率2,概率3等等)    %显然你要先知道每个数值的概率
freqs2=c(概率1,概率2,概率3等等)
KL.plugin(freqs1, freqs2, unit=c("log2"))
chi2.plugin(freqs1, freqs2, unit=c("log2"))




二维码

扫码加我 拉你入群

请注明:姓名-公司-职位

以便审核进群资格,未注明则拒绝

关键词:Entropy Library BRARY 导入数据 Data 程序

您需要登录后才可以回帖 登录 | 我要注册

本版微信群
加好友,备注cda
拉您进交流群
GMT+8, 2025-12-26 05:51