shenzenghui 回复 第19楼 的 dengyishuo：> z<-0 > for (i in 1:500) if (r[i,1]>=1.2) z=z+1 else i=i+1 > z [1] 54 请问是否正确
shenzenghui 回复 第29楼 的 dengyishuo：我想请问一下啊，我加载evir包后用命令 > s<-read.table("E://s.txt") > gpd.fitrange(s.1dr,-1,1.4,nint=100) 为什么出现错误说 “错误: 没有"gpd.fitrange"这个函数” 请问是怎么回事啊~~~
shenzenghui 回复 第27楼 的 dengyishuo：我想请问一下啊，我加载evir包后用命令 > s<-read.table("E://s.txt") > gpd.fitrange(s.1dr,-1,1.4,nint=100) 为什么出现错误说 “错误: 没有"gpd.fitrange"这个函数” 请问是怎么回事啊~~~
shenzenghui 回复 第32楼 的 dengyishuo：加载ismev包后，用命令 > s<-read.table("E://scores.txt") > s.gpd<-gpd.fit(s,1.3,npy=500) 出来错误说“错误于if (min(y) <= 0) l <- 10^6 else { : 需要TRUE/FALSE值的地方不可以用缺少值” 是不是ismev包未加载成功啊。。需要怎么解决。。万分感谢~
shenzenghui 回复 第32楼 的 dengyishuo：加载ismev包后，用命令 > s<-read.table("E://scores.txt") > s.gpd<-gpd.fit(s,1.3,npy=500) 出来错误说“错误于if (min(y) <= 0) l <- 10^6 else { : 需要TRUE/FALSE值的地方不可以用缺少值” 是不是ismev包未加载成功啊。。需要怎么解决。。万分感谢~
