在编程过程中遇到
> library(evir)
> m2<-pot(r,threshold=3)
Error in pot(r, threshold = 3) :
  (串列)对象不能强制改变成'double'种类
> m2<-gev(r,block=21)
Error in gev(r, block = 21) : (串列)对象不能强制改变成'double'种类


然后我试了下转换类型
> r<-as.numeric(r)
错误: (串列)对象不能强制改变成'double'种类

还是这句话， (串列)对象不能强制改变成'double'种类怎么解决呢
其中r数据是这样的
> r
                V1
1    -0.0002974350
2    -0.0000371855
3    -0.0001239620
4     0.0003222690
5     0.0001734860
6    -0.0002478470
7     0.0001611070
8    -0.0003098450
9     0.0000371865
10    0.0003470070
11   -0.0002106690
12   -0.0004834660
13   -0.0000371994
14   -0.0002480310
15    0.0000620136
16   -0.0001240310
17   -0.0001488580
18   -0.0005956520
19    0.0000744759
20   -0.0002606900
21    0.0001613870
22   -0.0005214990
23   -0.0005466250
24    0.0000621315
25    0.0000497024
26    0.0001739390
27   -0.0000248466
28   -0.0001242420
29    0.0000248497
30    0.0001490850
31   -0.0000869635
32   -0.0007208460
33   -0.0001492050
34   -0.0000621755
35   -0.0003109360
36    0.0000497562
37   -0.0001741580
38    0.0000248815
39    0.0005348030
40    0.0006215040
41    0.0000621292
42    0.0001490940
43    0.0001366500
44   -0.0003478740
45   -0.0010816660
46   -0.0004728190