R/create.Distance.Matrix.R

Defines functions create.Distance.Matrix

create.Distance.Matrix <-
function(position.matrix){
  distance.matrix <- as.matrix(dist(position.matrix[,4:6], diag = TRUE, upper = FALSE))
  colnames(distance.matrix) <- position.matrix[,2]
  rownames(distance.matrix) <- position.matrix[,2]
  return(distance.matrix)
  
}

Try the SpacePAC package in your browser

Any scripts or data that you put into this service are public.

SpacePAC documentation built on Nov. 8, 2020, 5:29 p.m.