private void ApplyTranslateScale(ProcrustedDataset p, double[,] samples)
{
// Save the original data
p.Source = samples;
// Save the original data center (i.e. mean)
p.Center = p.Source.Mean(dimension: 0);
// Translate the samples to zero
p.Dataset = Translate(samples);
// Save the original scale of the dataset
p.Scale = GetDatasetScale(p.Dataset);
// Scale the dataset to 1
p.Dataset = Scale(p.Dataset);
}