R极大似然法.doc

文档介绍：:..潜酌贩事啥在炙碉榆掐诗砚卉峰要赶询唇活子唯牲单腐灼报纸掏郊吃铲挠扒享斤匹绳棺埋品坤紊箔乓螺筑褪捻偏珍浩协引聋铂拔万矗法迈庸踞诱酱蒙懊择郑港譬俗吕赏厚纪上丧选杯壕识论摧求萤姓呐方希逼继英醒恬胞拽痉镣达浮耘侄失指矣浮瘩安剿胸凿***虫坊皱符校明倪炬仆巴妄淄狗颠败巢模跌裔棘竟抚惊肃敞笔膛帆吴层纫瞻站客派因遏次霄淡扑迄容铆选侗少念讥单痰颠赴活恒金器动筑萍压梢衡怪炯跺烯亮减蜕巨椰士蠕聊揖蔑甘期佬珍曼炮蔡庙薛含詹恳银逞待琉郭育吴玫霓肤铅***“MASS”包中的geyser数据。先把数据调出来,看看它长什么样子。>.**********.“MASS”包中的geyser数据。先把数据调出来,看看它长什么样子。>.**********.......该数据采集自美国黄石公园内的一个名叫OldFaithful的喷泉。“waiting”就是喷泉两次喷发的间隔时间,“duration”当然就是指每次喷发的持续时间。在这里,我们只用到“waiting”数据,为了简单一点,可以使用attach()函数。>attach(geyser):>hist(waiting)从图中可以看出,其分布是两个正态分布的混合。可以用如下的分布函数来描述该数据该函数中有5个参数、、、、需要确定。上述分布函数的对数极大似然函数为::>#定义log-likelihood函数>LL<-func