在点对之间创建距离函数

问：

我想创建一个函数，它接受两对数字并计算它们之间的距离。p1 = (x1, y1)p2 = (x2, y2)

我不明白的是，当涉及到数字对时，如何定义函数的参数。这是我尝试过的，但它不起作用。

Distance <- function (p1=c(x1, y1), p2=c(x2, y2)

我很确定我错过了一些非常基本的东西，但我已经尝试过：

Distance <- function (p1=c(x1, y1), p2=c(x2, y2){
    return(sqrt(x2-x1)ˆ2 +(y2-y1)ˆ2 )
}

主要是函数的论点，我不能工作，因为它是一对数字。