腳本中的R返回的數字（0），我解決不了

Question

我做了一個腳本來計算線路在笛卡爾的矩陣組成的座標點：

# Line Integral (Discrete) 
# Input dataSet(as a matrix) 
LineInt <- function(dataSet) 
{ 
    Dist = 0; 
    L = nrow(dataSet) 
    for (idx in 1: L - 1) 
    { 
        Dist = Dist + ( ((dataSet[idx + 1, 1] - dataSet[idx ,1])^2) + ((dataSet[idx + 1, 2] - dataSet[idx, 2])^2) )^(1/2) 
    } 
    return(Dist) 
} 

腳本只需要得到下一之間的性差異點和實際點，計算一個變量的距離和存儲模塊，然後返回該變量。但由於某種原因，我得到所有輸入的數字（0）。我是一名初學者，但仍無法在其他主題中找到解決方案。 IDX到DIST變量

Answer 1

索引應該做的，希望你可以得到解決

LineInt <- function(dataSet) 
    { 
     Dist = 0; 
     L = nrow(dataSet) 
     for (idx in 1: (L - 1)) 
     { 
      Dist[idx] = Dist + ( ((dataSet[idx + 1, 1] - dataSet[idx ,1])^2) + ((dataSet[idx + 1, 2] - dataSet[idx, 2])^2) )^(1/2) 
     } 
     return(Dist) 
    }