lis [[i]]中的错误：尝试选择少于一个元素

此代码旨在计算某些给定坐标的总距离，但我不知道它为什么不起作用。lis [[i]]中的错误：尝试选择少于一个元素

的错误是：Error in lis[[i]] : attempt to select less than one element.

下面是代码：

distant<-function(a,b) 
{ 
    return(sqrt((a[1]-b[1])^2+(a[2]-b[2])^2)) 
} 
totdistance<-function(lis) 
{ 
    totdis=0 
    for(i in 1:length(lis)-1) 
    { 
    totdis=totdis+distant(lis[[i]],lis[[i+1]]) 
    } 
    totdis=totdis+distant(lis[[1]],lis[[length(lis)]]) 
    return(totdis) 
} 
liss1<-list() 
liss1[[1]]<-c(12,12) 
liss1[[2]]<-c(18,23) 
liss1[[4]]<-c(29,25) 
liss1[[5]]<-c(31,52) 
liss1[[3]]<-c(24,21) 
liss1[[6]]<-c(36,43) 
liss1[[7]]<-c(37,14) 
liss1[[8]]<-c(42,8) 
liss1[[9]]<-c(51,47) 
liss1[[10]]<-c(62,53) 
liss1[[11]]<-c(63,19) 
liss1[[12]]<-c(69,39) 
liss1[[13]]<-c(81,7) 
liss1[[14]]<-c(82,18) 
liss1[[15]]<-c(83,40) 
liss1[[16]]<-c(88,30)

输出：

> totdistance(liss1) 
Error in lis[[i]] : attempt to select less than one element 
> distant(liss1[[2]],liss1[[3]]) 
[1] 6.324555

来源

2015-05-03 Tommy Yu

，就应该替换为'（我在1：长度（LIS）-1）'和'的（ i in 1：（length（lis）-1）''。 '：'运算符在减法'-'之前被计算。 – Molx

虽然我们在这里，但除非要保存其他属性，否则矩阵可能比列表更适合多边形数据。 – Molx

问题解决。非常感谢。 –

让我复制你的错误以简单的方式

>list1 = list() 
> list1[[0]]=list(a=c("a")) 
>Error in list1[[0]] = list(a = c("a")) : 
attempt to select less than one element

所以，下一个问题是你在哪里访问0索引列表？（列表的索引从R中的1开始）

由于Molx，在以前的帖子中指出：“The：操作符在减法之前被评估 - ”。这导致了0索引列表访问。

对于前：

> 1:10-1 
[1] 0 1 2 3 4 5 6 7 8 9 
>1:(10-1) 
[1] 1 2 3 4 5 6 7 8 9

所以更换你的代码下面几行

>for(i in 1:(length(lis)-1)) 
{  
    totdis=totdis+distant(lis[[i]],lis[[i+1]]) 
}

来源

2016-01-21 09:17:41

lis [[i]]中的错误：尝试选择少于一个元素

回答

相关问题