dist3d {kml3d}

~ Function: dist3d ~

Description

Compute the distante between two joint trajectories.

Usage

dist3d(x, y, method = "euclidian", power = 2)

Arguments

x

[matrix(numeric)]: first trajectory. The colomn are time, the line are variables.

y

[matrix(numeric)]: second trajectory. The colomn are time, the line are variables.

method

[character]: method used. Should be one of the method used by the function dist.

power

[numeric]: if method="minkowski", poweris the power used.

Details

Compute the distante between two joint trajectories, using one of the distance define by dist.

Value

A numeric

Examples

  ### Move to tempdir
  wd <- getwd()
  setwd(tempdir()); getwd()

  ### Generate artificial data
  myCld <- gald3d()

  ### Distance between individual 1 and 3 (there are in the same group)
  dist3d(myCld['traj'][1,,],myCld['traj'][3,,])

  ### Distance between individual 1 and 51 (there are in two different groups)
  dist3d(myCld['traj'][1,,],myCld['traj'][51,,])
  
  ### Go back to current dir
  setwd(wd)