找回密码
 注册
查看: 282|回复: 0

R语言 SAFD包 bertoluzza()函数中文帮助文档(中英文对照)

[复制链接]
发表于 2012-9-29 21:29:00 | 显示全部楼层 |阅读模式
bertoluzza(SAFD)
bertoluzza()所属R语言包:SAFD

                                         Bertoluzza distance
                                         Bertoluzza距离

                                         译者:生物统计家园网 机器人LoveR

描述----------Description----------

Given two polygonal fuzzy numbers X, Y in the correct format (testing by checking) the function calculates the Bertoluzza distance of X, Y. The parameter theta (being the weight of the spread) has to fulfill theta>0, by default theta=1/3 (which corresponds to the Lebesgue measure as weighting measure on [0,1]). For detailed explanation see the papers [1] and [2] below.
鉴于两个多边形模糊数X,Y在正确的格式(测试通过checking)函数计算的Bertoluzza距离X,Y,。参数theta(即重量的传播)具有履行theta> 0,缺省情况下,theta= 1/3(对应Lebesgue测度作为加权措施[ 0,1])。详细说明见文献[1]和[2]中。


用法----------Usage----------


bertoluzza(X, Y, theta = 1/3, pic = 0)



参数----------Arguments----------

参数:X
...dataframe (polygonal fuzzy number)  
...数据框(多边形模糊数)


参数:Y
...dataframe (polygonal fuzzy number)  
...数据框(多边形模糊数)


参数:theta
...numeric and >0  
...数值> 0


参数:pic
...numeric, if pic==1 X and Y are plotted, by default no plot is produced.   
...数字,如果pic== 1 X和Y绘制,默认情况下,没有图。


Details

详细信息----------Details----------

See examples
请参见示例


值----------Value----------

...in case X and Y fulfill the conditions tested implicitly by checking the code returns the Bertoluzza distance, otherwise NA is returned.
的情况下X和Y履行条件下进行测试checking的的代码返回Bertoluzza的距离,否则不适用,则返回隐式。


注意----------Note----------

In case you find (almost surely existing) bugs or have recommendations for improving the functions comments are welcome to the above mentioned mail addresses.
如果你发现改善的功能(几乎可以肯定存在的)错误,或有建议意见,欢迎上述电子邮件地址。


(作者)----------Author(s)----------



Wolfgang Trutschnig <wolfgang@trutschnig.net>, Asun Lubiano <lubiano@uniovi.es>




参考文献----------References----------




参见----------See Also----------

See Also as Mmean, checking
请参见Mmean,checking


实例----------Examples----------


#[]
data(XX)
X<-translator(XX[[1]],50)
Y<-translator(XX[[2]],50)
Z<-translator(XX[[3]],50)
ZZ<-list(X,Y,Z)
b<-bertoluzza(X,Y,1/3,1)
b

#example (SLLN for the FRV)[例如(SLLN的FRV)]
V<-translator(XX[[3]],100)
YY<-vector("list",length=50)
  for(i in 1:50){
   YY[[i]]<-generator(V,,,)
   }
M<-Mmean(YY)
head(M)
b<-bertoluzza(M,V,1/3,1)
b

V<-translator(XX[[3]],100)
YY<-vector("list",length=1000)
  for(i in 1:1000){
   YY[[i]]<-generator(V,,,)
   }
M<-Mmean(YY)
head(M)
b<-bertoluzza(M,V,1/3,1)  
b

#[]
X<-data.frame(x=c(0,1,1,2),alpha=c(0,1,1,0))
Y<-data.frame(x=c(0,1,2),alpha=c(0,1,0))
b<-bertoluzza(X,Y,1/3,1)
b

转载请注明:出自 生物统计家园网(http://www.biostatistic.net)。


注:
注1:为了方便大家学习,本文档为生物统计家园网机器人LoveR翻译而成,仅供个人R语言学习参考使用,生物统计家园保留版权。
注2:由于是机器人自动翻译,难免有不准确之处,使用时仔细对照中、英文内容进行反复理解,可以帮助R语言的学习。
注3:如遇到不准确之处,请在本贴的后面进行回帖,我们会逐渐进行修订。
回复

使用道具 举报

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

本版积分规则

手机版|小黑屋|生物统计家园 网站价格

GMT+8, 2024-11-29 00:33 , Processed in 0.019953 second(s), 16 queries .

Powered by Discuz! X3.5

© 2001-2024 Discuz! Team.

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