powered by
triangleArea(x, y, digits = 3)
distance
a <- c(1,5.387965,9); b <- c(1,1,5) plot(a[c(1:3,1)], b[c(1:3,1)], type="l", asp=1)#; grid() triangleArea(a,b) #triangleArea(a,b[1:2])
Run the code above in your browser using DataLab