> web[,7]
  [1] 0.88% 0.94% 1.26% 1.19% 1.23% 1.18% 1.12% 1.16% 1.23% 0.94% 1.24% 1.09%
[13] 1.09% 0.82% 0.92% 1.08% 0.92% 0.91% 0.74% 0.68% 0.49% 0.3%  0.42% 0.47%
转化后
> as.numeric(web[,7])
  [1]  15  19  40  35  37  34  28  32  37  19  38  25  25  13  18  24  18  17
[19]  11  10   7   3   4   5
应该如何实现正常的转化呢