Files
richard-churchman cc0a2bee21 Extensive modifications to the serialisation of Neural Network models to support Newtonsoft Json.net rather than Binary Serializer.
Included open-source Accord.net library code natively to the solution given the deprecated state of that project.  Accord.net will be supported inside Jube for own needs (such as upgrading to .Net 7+).

Accord.net libraries modified to compile to .Net 6.

Modified Accord.net libraries to better support Newtonsoft Json.net serialisation.

Included annotations in the Accord.net libraries to house important dependency statistics. Serialised json can be used independently of Jube to recall a Neural Network.

Removal of Binary Serializer totally as a precursor to the projects support of .Net 7+.

Extensive bug fixing in crucial functions of Neural Network training and recall.  While this part of the system remains in Alpha, it is substantially more fit for purpose.
2023-12-24 10:22:22 +01:00

266 lines
8.7 KiB
C#

// Accord Math Library
// The Accord.NET Framework
// http://accord-framework.net
//
// Copyright © César Souza, 2009-2017
// cesarsouza at gmail.com
//
// This library is free software; you can redistribute it and/or
// modify it under the terms of the GNU Lesser General Public
// License as published by the Free Software Foundation; either
// version 2.1 of the License, or (at your option) any later version.
//
// This library is distributed in the hope that it will be useful,
// but WITHOUT ANY WARRANTY; without even the implied warranty of
// MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
// Lesser General Public License for more details.
//
// You should have received a copy of the GNU Lesser General Public
// License along with this library; if not, write to the Free Software
// Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA
//
namespace Accord.Math.Distances
{
using System;
using System.Runtime.CompilerServices;
using Accord.Compat;
/// <summary>
/// Square-Euclidean distance and similarity. Please note that this
/// distance is not a metric as it doesn't obey the triangle inequality.
/// </summary>
///
/// <seealso cref="Euclidean"/>
///
[Serializable]
public struct SquareEuclidean :
IDistance<double[]>, ISimilarity<double[]>,
IDistance<double>, ISimilarity<double>,
IDistance<Sparse<double>>, ISimilarity<Sparse<double>>, ICloneable
{
/// <summary>
/// Computes the distance <c>d(x,y)</c> between points
/// <paramref name="x"/> and <paramref name="y"/>.
/// </summary>
///
/// <param name="x">The first point <c>x</c>.</param>
/// <param name="y">The second point <c>y</c>.</param>
///
/// <returns>
/// A double-precision value representing the distance <c>d(x,y)</c>
/// between <paramref name="x"/> and <paramref name="y"/> according
/// to the distance function implemented by this class.
/// </returns>
///
#if NET45 || NET46 || NET462 || NETSTANDARD2_0
[MethodImpl(MethodImplOptions.AggressiveInlining)]
#endif
public double Distance(double[] x, double[] y)
{
double sum = 0.0;
for (int i = 0; i < x.Length; i++)
{
double u = x[i] - y[i];
sum += u * u;
}
return sum;
}
/// <summary>
/// Computes the distance <c>d(x,y)</c> between points
/// <paramref name="x"/> and <paramref name="y"/>.
/// </summary>
///
/// <param name="x">The first point <c>x</c>.</param>
/// <param name="y">The second point <c>y</c>.</param>
///
/// <returns>
/// A double-precision value representing the distance <c>d(x,y)</c>
/// between <paramref name="x"/> and <paramref name="y"/> according
/// to the distance function implemented by this class.
/// </returns>
///
#if NET45 || NET46 || NET462 || NETSTANDARD2_0
[MethodImpl(MethodImplOptions.AggressiveInlining)]
#endif
public double Distance(double x, double y)
{
double u = x - y;
return u * u;
}
/// <summary>
/// Computes the distance <c>d(x,y)</c> between points
/// <paramref name="x"/> and <paramref name="y"/>.
/// </summary>
///
/// <param name="x">The first point <c>x</c>.</param>
/// <param name="y">The second point <c>y</c>.</param>
///
/// <returns>
/// A double-precision value representing the distance <c>d(x,y)</c>
/// between <paramref name="x"/> and <paramref name="y"/> according
/// to the distance function implemented by this class.
/// </returns>
///
#if NET45 || NET46 || NET462 || NETSTANDARD2_0
[MethodImpl(MethodImplOptions.AggressiveInlining)]
#endif
public double Distance(Sparse<double> x, Sparse<double> y)
{
return Sparse(x, y);
}
/// <summary>
/// Gets the Square Euclidean distance between two points.
/// </summary>
///
/// <param name="x1">The first coordinate of first point in space.</param>
/// <param name="y1">The second coordinate of first point in space.</param>
/// <param name="x2">The first coordinate of second point in space.</param>
/// <param name="y2">The second coordinate of second point in space.</param>
///
/// <returns>The Square Euclidean distance between x and y.</returns>
///
#if NET45 || NET46 || NET462 || NETSTANDARD2_0
[MethodImpl(MethodImplOptions.AggressiveInlining)]
#endif
public double Distance(double x1, double y1, double x2, double y2)
{
double dx = x1 - x2;
double dy = y1 - y2;
return dx * dx + dy * dy;
}
/// <summary>
/// Gets a similarity measure between two points.
/// </summary>
///
/// <param name="x">The first point to be compared.</param>
/// <param name="y">The second point to be compared.</param>
///
/// <returns>A similarity measure between x and y.</returns>
///
#if NET45 || NET46 || NET462 || NETSTANDARD2_0
[MethodImpl(MethodImplOptions.AggressiveInlining)]
#endif
public double Similarity(double[] x, double[] y)
{
return 1.0 / (1.0 + Distance(x, y));
}
/// <summary>
/// Gets a similarity measure between two points.
/// </summary>
///
/// <param name="x">The first point to be compared.</param>
/// <param name="y">The second point to be compared.</param>
///
/// <returns>A similarity measure between x and y.</returns>
///
#if NET45 || NET46 || NET462 || NETSTANDARD2_0
[MethodImpl(MethodImplOptions.AggressiveInlining)]
#endif
public double Similarity(Sparse<double> x, Sparse<double> y)
{
return 1.0 / (1.0 + Distance(x, y));
}
/// <summary>
/// Gets a similarity measure between two points.
/// </summary>
///
/// <param name="x">The first point to be compared.</param>
/// <param name="y">The second point to be compared.</param>
///
/// <returns>A similarity measure between x and y.</returns>
///
#if NET45 || NET46 || NET462 || NETSTANDARD2_0
[MethodImpl(MethodImplOptions.AggressiveInlining)]
#endif
public double Similarity(double x, double y)
{
return 1.0 / (1.0 + Distance(x, y));
}
/// <summary>
/// Computes the distance <c>d(x,y)</c> between points
/// <paramref name="x"/> and <paramref name="y"/>.
/// </summary>
///
/// <param name="x">The first point <c>x</c>.</param>
/// <param name="y">The second point <c>y</c>.</param>
///
/// <returns>
/// A double-precision value representing the distance <c>d(x,y)</c>
/// between <paramref name="x"/> and <paramref name="y"/> according
/// to the distance function implemented by this class.
/// </returns>
///
public static double Sparse(Sparse<double> x, Sparse<double> y)
{
double sum = 0;
int i = 0, j = 0;
while (i < x.Indices.Length && j < y.Indices.Length)
{
int posx = x.Indices[i];
int posy = y.Indices[j];
if (posx == posy)
{
double d = x.Values[i] - y.Values[j];
sum += d * d;
i++;
j++;
}
else if (posx < posy)
{
double d = x.Values[i];
sum += d * d;
i++;
}
else if (posx > posy)
{
double d = y.Values[j];
sum += d * d;
j++;
}
}
for (; i < x.Values.Length; i++)
sum += x.Values[i] * x.Values[i];
for (; j < y.Values.Length; j++)
sum += y.Values[j] * y.Values[j];
return sum;
}
/// <summary>
/// Creates a new object that is a copy of the current instance.
/// </summary>
/// <returns>A new object that is a copy of this instance.</returns>
public object Clone()
{
return new SquareEuclidean();
}
}
}