R/save.LM.R

In jfpalomeque/pandora: Data processing of marks in bones, from images of sections

save.LM <-
function(){#Select coordinates of each LM, from matrixLM
  LM1x<<-matrixLM[1,1]
  LM1y<<-matrixLM[1,2]
  LM2x<<-matrixLM[2,1]
  LM2y<<-matrixLM[2,2]
  LM3x<<-matrixLM[3,1]
  LM3y<<-matrixLM[3,2]
  LM4x<<-matrixLM[4,1]
  LM4y<<-matrixLM[4,2]
  LM5x<<-matrixLM[5,1]
  LM5y<<-matrixLM[5,2]
  LM6x<<-matrixLM[6,1]
  LM6y<<-matrixLM[6,2]
  LM7x<<-matrixLM[7,1]
  LM7y<<-matrixLM[7,2]
}