自编函数运行后弹出numeric(0)，这是什么类型的错误？

是 否 +2 论坛币

k人 参与回答

经管之家送您一份

应届毕业生专属福利!

求职就业群

赵安豆老师微信：zhaoandou666

经管之家联合CDA

送您一个全额奖学金名额~ !

立即领取

感谢您参与论坛问题回答

经管之家送您两个论坛币！

+2 论坛币

如题，谢谢解答~

扫码加我 拉你入群

请注明：姓名-公司-职位

以便审核进群资格，未注明则拒绝

分享0 收藏0 回帖

关键词：numeric Eric NUM

给个例子看看

bbslover 发表于 2016-7-1 21:41
给个例子看看

1. S <- function(m, n){
   
2.   
   
3.   x=which(配送点信息$Spot_id == "m")
   
4.   y=which(网点信息$Site_id == "n")
   
5.   
   
6.   lng_1=as.double(配送点信息$Lng[x])
   
7.   lng_2=as.double(网点信息$Lng[y])
   
8.   lat_1=as.double(配送点信息$Lat[x])
   
9.   lat_2=as.double(网点信息$Lat[y])
   
10.   
    
11.     K=2*6378137*asin(sin(pi/180*(lat_1-lat_2))^2+cos(pi/180*lat_1)*cos(pi/180*lat_2)*sin(pi/180*(lng_1-lng_2))^2)^0.5
    
12.   return(K)
    
13. }

复制代码

这个不是错误吧，只是说没有值

lng_1  lng_2   lat_1   lat_2  看看这些值得情况

czrdiao 发表于 2016-7-2 19:15
这个不是错误吧，只是说没有值

好的，谢谢，我再看看

bbslover 发表于 2016-7-2 20:45
lng_1  lng_2   lat_1   lat_2  看看这些值得情况

谢谢，我看看