mirror of
https://github.com/wpilibsuite/allwpilib
synced 2026-06-29 02:21:44 +00:00
[wpimath] Clean up NumericalIntegration and add Discretization tests (#3489)
* Rename Butcher tableau sections in NumericalIntegration such that top-left is c, top-right is A, and bottom-right is b * Move edu.wpi.first.math.Discretization to edu.wpi.first.math.system.Discretization * Sort Java Discretization to match C++ function order * Add tests for Java Discretization * Required adding Runge-Kutta time-varying impl to tests * Move C++ Runge-Kutta time-varying impl to tests only * Users don't need it
This commit is contained in:
@@ -12,6 +12,7 @@ import edu.wpi.first.math.geometry.Pose2d;
|
||||
import edu.wpi.first.math.geometry.Rotation2d;
|
||||
import edu.wpi.first.math.numbers.N1;
|
||||
import edu.wpi.first.math.numbers.N2;
|
||||
import edu.wpi.first.math.system.Discretization;
|
||||
import java.util.ArrayList;
|
||||
import java.util.List;
|
||||
import org.ejml.dense.row.MatrixFeatures_DDRM;
|
||||
|
||||
@@ -8,7 +8,6 @@ import static org.junit.jupiter.api.Assertions.assertDoesNotThrow;
|
||||
import static org.junit.jupiter.api.Assertions.assertEquals;
|
||||
import static org.junit.jupiter.api.Assertions.assertTrue;
|
||||
|
||||
import edu.wpi.first.math.Discretization;
|
||||
import edu.wpi.first.math.Matrix;
|
||||
import edu.wpi.first.math.Nat;
|
||||
import edu.wpi.first.math.StateSpaceUtil;
|
||||
@@ -19,6 +18,7 @@ import edu.wpi.first.math.numbers.N1;
|
||||
import edu.wpi.first.math.numbers.N2;
|
||||
import edu.wpi.first.math.numbers.N4;
|
||||
import edu.wpi.first.math.numbers.N6;
|
||||
import edu.wpi.first.math.system.Discretization;
|
||||
import edu.wpi.first.math.system.NumericalIntegration;
|
||||
import edu.wpi.first.math.system.NumericalJacobian;
|
||||
import edu.wpi.first.math.system.plant.DCMotor;
|
||||
|
||||
@@ -0,0 +1,215 @@
|
||||
// Copyright (c) FIRST and other WPILib contributors.
|
||||
// Open Source Software; you can modify and/or share it under the terms of
|
||||
// the WPILib BSD license file in the root directory of this project.
|
||||
|
||||
package edu.wpi.first.math.system;
|
||||
|
||||
import static org.junit.jupiter.api.Assertions.assertEquals;
|
||||
import static org.junit.jupiter.api.Assertions.assertTrue;
|
||||
|
||||
import edu.wpi.first.math.MatBuilder;
|
||||
import edu.wpi.first.math.Matrix;
|
||||
import edu.wpi.first.math.Nat;
|
||||
import edu.wpi.first.math.VecBuilder;
|
||||
import edu.wpi.first.math.numbers.N2;
|
||||
import org.junit.jupiter.api.Test;
|
||||
|
||||
public class DiscretizationTest {
|
||||
// Check that for a simple second-order system that we can easily analyze
|
||||
// analytically,
|
||||
@Test
|
||||
public void testDiscretizeA() {
|
||||
final var contA = new MatBuilder<>(Nat.N2(), Nat.N2()).fill(0, 1, 0, 0);
|
||||
final var x0 = VecBuilder.fill(1, 1);
|
||||
|
||||
final var discA = Discretization.discretizeA(contA, 1.0);
|
||||
final var x1Discrete = discA.times(x0);
|
||||
|
||||
// We now have pos = vel = 1 and accel = 0, which should give us:
|
||||
final var x1Truth =
|
||||
VecBuilder.fill(
|
||||
1.0 * x0.get(0, 0) + 1.0 * x0.get(1, 0), 0.0 * x0.get(0, 0) + 1.0 * x0.get(1, 0));
|
||||
|
||||
assertEquals(x1Truth, x1Discrete);
|
||||
}
|
||||
|
||||
// Check that for a simple second-order system that we can easily analyze
|
||||
// analytically,
|
||||
@Test
|
||||
public void testDiscretizeAB() {
|
||||
final var contA = new MatBuilder<>(Nat.N2(), Nat.N2()).fill(0, 1, 0, 0);
|
||||
final var contB = new MatBuilder<>(Nat.N2(), Nat.N1()).fill(0, 1);
|
||||
|
||||
final var x0 = VecBuilder.fill(1, 1);
|
||||
final var u = VecBuilder.fill(1);
|
||||
|
||||
var discABPair = Discretization.discretizeAB(contA, contB, 1.0);
|
||||
var discA = discABPair.getFirst();
|
||||
var discB = discABPair.getSecond();
|
||||
|
||||
var x1Discrete = discA.times(x0).plus(discB.times(u));
|
||||
|
||||
// We now have pos = vel = accel = 1, which should give us:
|
||||
final var x1Truth =
|
||||
VecBuilder.fill(
|
||||
1.0 * x0.get(0, 0) + 1.0 * x0.get(1, 0) + 0.5 * u.get(0, 0),
|
||||
0.0 * x0.get(0, 0) + 1.0 * x0.get(1, 0) + 1.0 * u.get(0, 0));
|
||||
|
||||
assertEquals(x1Truth, x1Discrete);
|
||||
}
|
||||
|
||||
// Test that the discrete approximation of Q is roughly equal to
|
||||
// integral from 0 to dt of e^(A tau) Q e^(A.T tau) dtau
|
||||
@Test
|
||||
public void testDiscretizeSlowModelAQ() {
|
||||
final var contA = new MatBuilder<>(Nat.N2(), Nat.N2()).fill(0, 1, 0, 0);
|
||||
final var contQ = new MatBuilder<>(Nat.N2(), Nat.N2()).fill(1, 0, 0, 1);
|
||||
|
||||
final double dt = 1.0;
|
||||
|
||||
final var discQIntegrated =
|
||||
RungeKuttaTimeVarying.rungeKuttaTimeVarying(
|
||||
(Double t, Matrix<N2, N2> x) ->
|
||||
contA.times(t).exp().times(contQ).times(contA.transpose().times(t).exp()),
|
||||
0.0,
|
||||
new Matrix<>(Nat.N2(), Nat.N2()),
|
||||
dt);
|
||||
|
||||
var discAQPair = Discretization.discretizeAQ(contA, contQ, dt);
|
||||
var discQ = discAQPair.getSecond();
|
||||
|
||||
assertTrue(
|
||||
discQIntegrated.minus(discQ).normF() < 1e-10,
|
||||
"Expected these to be nearly equal:\ndiscQ:\n"
|
||||
+ discQ
|
||||
+ "\ndiscQIntegrated:\n"
|
||||
+ discQIntegrated);
|
||||
}
|
||||
|
||||
// Test that the discrete approximation of Q is roughly equal to
|
||||
// integral from 0 to dt of e^(A tau) Q e^(A.T tau) dtau
|
||||
@Test
|
||||
public void testDiscretizeFastModelAQ() {
|
||||
final var contA = new MatBuilder<>(Nat.N2(), Nat.N2()).fill(0, 1, 0, -1406.29);
|
||||
final var contQ = new MatBuilder<>(Nat.N2(), Nat.N2()).fill(0.0025, 0, 0, 1);
|
||||
|
||||
final var dt = 0.005;
|
||||
|
||||
final var discQIntegrated =
|
||||
RungeKuttaTimeVarying.rungeKuttaTimeVarying(
|
||||
(Double t, Matrix<N2, N2> x) ->
|
||||
contA.times(t).exp().times(contQ).times(contA.transpose().times(t).exp()),
|
||||
0.0,
|
||||
new Matrix<>(Nat.N2(), Nat.N2()),
|
||||
dt);
|
||||
|
||||
var discAQPair = Discretization.discretizeAQ(contA, contQ, dt);
|
||||
var discQ = discAQPair.getSecond();
|
||||
|
||||
assertTrue(
|
||||
discQIntegrated.minus(discQ).normF() < 1e-3,
|
||||
"Expected these to be nearly equal:\ndiscQ:\n"
|
||||
+ discQ
|
||||
+ "\ndiscQIntegrated:\n"
|
||||
+ discQIntegrated);
|
||||
}
|
||||
|
||||
// Test that the Taylor series discretization produces nearly identical results.
|
||||
@Test
|
||||
public void testDiscretizeSlowModelAQTaylor() {
|
||||
final var contA = new MatBuilder<>(Nat.N2(), Nat.N2()).fill(0, 1, 0, 0);
|
||||
final var contQ = new MatBuilder<>(Nat.N2(), Nat.N2()).fill(1, 0, 0, 1);
|
||||
|
||||
final var dt = 1.0;
|
||||
|
||||
// Continuous Q should be positive semidefinite
|
||||
final var esCont = contQ.getStorage().eig();
|
||||
for (int i = 0; i < contQ.getNumRows(); ++i) {
|
||||
assertTrue(esCont.getEigenvalue(i).real >= 0);
|
||||
}
|
||||
|
||||
final var discQIntegrated =
|
||||
RungeKuttaTimeVarying.rungeKuttaTimeVarying(
|
||||
(Double t, Matrix<N2, N2> x) ->
|
||||
contA.times(t).exp().times(contQ).times(contA.transpose().times(t).exp()),
|
||||
0.0,
|
||||
new Matrix<>(Nat.N2(), Nat.N2()),
|
||||
dt);
|
||||
|
||||
var discA = Discretization.discretizeA(contA, dt);
|
||||
|
||||
var discAQPair = Discretization.discretizeAQ(contA, contQ, dt);
|
||||
var discATaylor = discAQPair.getFirst();
|
||||
var discQTaylor = discAQPair.getSecond();
|
||||
|
||||
assertTrue(
|
||||
discQIntegrated.minus(discQTaylor).normF() < 1e-10,
|
||||
"Expected these to be nearly equal:\ndiscQTaylor:\n"
|
||||
+ discQTaylor
|
||||
+ "\ndiscQIntegrated:\n"
|
||||
+ discQIntegrated);
|
||||
assertTrue(discA.minus(discATaylor).normF() < 1e-10);
|
||||
|
||||
// Discrete Q should be positive semidefinite
|
||||
final var esDisc = discQTaylor.getStorage().eig();
|
||||
for (int i = 0; i < discQTaylor.getNumRows(); ++i) {
|
||||
assertTrue(esDisc.getEigenvalue(i).real >= 0);
|
||||
}
|
||||
}
|
||||
|
||||
// Test that the Taylor series discretization produces nearly identical results.
|
||||
@Test
|
||||
public void testDiscretizeFastModelAQTaylor() {
|
||||
final var contA = new MatBuilder<>(Nat.N2(), Nat.N2()).fill(0, 1, 0, -1500);
|
||||
final var contQ = new MatBuilder<>(Nat.N2(), Nat.N2()).fill(0.0025, 0, 0, 1);
|
||||
|
||||
final var dt = 0.005;
|
||||
|
||||
// Continuous Q should be positive semidefinite
|
||||
final var esCont = contQ.getStorage().eig();
|
||||
for (int i = 0; i < contQ.getNumRows(); ++i) {
|
||||
assertTrue(esCont.getEigenvalue(i).real >= 0);
|
||||
}
|
||||
|
||||
final var discQIntegrated =
|
||||
RungeKuttaTimeVarying.rungeKuttaTimeVarying(
|
||||
(Double t, Matrix<N2, N2> x) ->
|
||||
contA.times(t).exp().times(contQ).times(contA.transpose().times(t).exp()),
|
||||
0.0,
|
||||
new Matrix<>(Nat.N2(), Nat.N2()),
|
||||
dt);
|
||||
|
||||
var discA = Discretization.discretizeA(contA, dt);
|
||||
|
||||
var discAQPair = Discretization.discretizeAQ(contA, contQ, dt);
|
||||
var discATaylor = discAQPair.getFirst();
|
||||
var discQTaylor = discAQPair.getSecond();
|
||||
|
||||
assertTrue(
|
||||
discQIntegrated.minus(discQTaylor).normF() < 1e-3,
|
||||
"Expected these to be nearly equal:\ndiscQTaylor:\n"
|
||||
+ discQTaylor
|
||||
+ "\ndiscQIntegrated:\n"
|
||||
+ discQIntegrated);
|
||||
assertTrue(discA.minus(discATaylor).normF() < 1e-10);
|
||||
|
||||
// Discrete Q should be positive semidefinite
|
||||
final var esDisc = discQTaylor.getStorage().eig();
|
||||
for (int i = 0; i < discQTaylor.getNumRows(); ++i) {
|
||||
assertTrue(esDisc.getEigenvalue(i).real >= 0);
|
||||
}
|
||||
}
|
||||
|
||||
// Test that DiscretizeR() works
|
||||
@Test
|
||||
public void testDiscretizeR() {
|
||||
var contR = Matrix.mat(Nat.N2(), Nat.N2()).fill(2.0, 0.0, 0.0, 1.0);
|
||||
var discRTruth = Matrix.mat(Nat.N2(), Nat.N2()).fill(4.0, 0.0, 0.0, 2.0);
|
||||
|
||||
var discR = Discretization.discretizeR(contR, 0.5);
|
||||
|
||||
assertTrue(
|
||||
discRTruth.minus(discR).normF() < 1e-10,
|
||||
"Expected these to be nearly equal:\ndiscR:\n" + discR + "\ndiscRTruth:\n" + discRTruth);
|
||||
}
|
||||
}
|
||||
@@ -14,11 +14,9 @@ import org.junit.jupiter.api.Test;
|
||||
|
||||
public class NumericalIntegrationTest {
|
||||
@Test
|
||||
@SuppressWarnings({"ParameterName", "LocalVariableName"})
|
||||
public void testExponential() {
|
||||
Matrix<N1, N1> y0 = VecBuilder.fill(0.0);
|
||||
|
||||
//noinspection SuspiciousNameCombination
|
||||
var y1 =
|
||||
NumericalIntegration.rk4(
|
||||
(Matrix<N1, N1> x) -> {
|
||||
@@ -33,11 +31,9 @@ public class NumericalIntegrationTest {
|
||||
}
|
||||
|
||||
@Test
|
||||
@SuppressWarnings({"ParameterName", "LocalVariableName"})
|
||||
public void testExponentialRKF45() {
|
||||
Matrix<N1, N1> y0 = VecBuilder.fill(0.0);
|
||||
|
||||
//noinspection SuspiciousNameCombination
|
||||
var y1 =
|
||||
NumericalIntegration.rkf45(
|
||||
(x, u) -> {
|
||||
@@ -53,11 +49,9 @@ public class NumericalIntegrationTest {
|
||||
}
|
||||
|
||||
@Test
|
||||
@SuppressWarnings({"ParameterName", "LocalVariableName"})
|
||||
public void testExponentialRKDP() {
|
||||
Matrix<N1, N1> y0 = VecBuilder.fill(0.0);
|
||||
|
||||
//noinspection SuspiciousNameCombination
|
||||
var y1 =
|
||||
NumericalIntegration.rkdp(
|
||||
(x, u) -> {
|
||||
|
||||
@@ -0,0 +1,41 @@
|
||||
// Copyright (c) FIRST and other WPILib contributors.
|
||||
// Open Source Software; you can modify and/or share it under the terms of
|
||||
// the WPILib BSD license file in the root directory of this project.
|
||||
|
||||
package edu.wpi.first.math.system;
|
||||
|
||||
import edu.wpi.first.math.Matrix;
|
||||
import edu.wpi.first.math.Num;
|
||||
import java.util.function.BiFunction;
|
||||
|
||||
public final class RungeKuttaTimeVarying {
|
||||
private RungeKuttaTimeVarying() {
|
||||
// Utility class
|
||||
}
|
||||
|
||||
/**
|
||||
* Performs 4th order Runge-Kutta integration of dx/dt = f(t, y) for dt.
|
||||
*
|
||||
* @param <Rows> Rows in y.
|
||||
* @param <Cols> Columns in y.
|
||||
* @param f The function to integrate. It must take two arguments t and y.
|
||||
* @param t The initial value of t.
|
||||
* @param y The initial value of y.
|
||||
* @param dtSeconds The time over which to integrate.
|
||||
*/
|
||||
@SuppressWarnings("MethodTypeParameterName")
|
||||
public static <Rows extends Num, Cols extends Num> Matrix<Rows, Cols> rungeKuttaTimeVarying(
|
||||
BiFunction<Double, Matrix<Rows, Cols>, Matrix<Rows, Cols>> f,
|
||||
double t,
|
||||
Matrix<Rows, Cols> y,
|
||||
double dtSeconds) {
|
||||
final var h = dtSeconds;
|
||||
|
||||
Matrix<Rows, Cols> k1 = f.apply(t, y);
|
||||
Matrix<Rows, Cols> k2 = f.apply(t + dtSeconds * 0.5, y.plus(k1.times(h * 0.5)));
|
||||
Matrix<Rows, Cols> k3 = f.apply(t + dtSeconds * 0.5, y.plus(k2.times(h * 0.5)));
|
||||
Matrix<Rows, Cols> k4 = f.apply(t + dtSeconds, y.plus(k3.times(h)));
|
||||
|
||||
return y.plus((k1.plus(k2.times(2.0)).plus(k3.times(2.0)).plus(k4)).times(h / 6.0));
|
||||
}
|
||||
}
|
||||
@@ -0,0 +1,43 @@
|
||||
// Copyright (c) FIRST and other WPILib contributors.
|
||||
// Open Source Software; you can modify and/or share it under the terms of
|
||||
// the WPILib BSD license file in the root directory of this project.
|
||||
|
||||
package edu.wpi.first.math.system;
|
||||
|
||||
import static org.junit.jupiter.api.Assertions.assertEquals;
|
||||
|
||||
import edu.wpi.first.math.MatBuilder;
|
||||
import edu.wpi.first.math.Matrix;
|
||||
import edu.wpi.first.math.Nat;
|
||||
import edu.wpi.first.math.numbers.N1;
|
||||
import org.junit.jupiter.api.Test;
|
||||
|
||||
public class RungeKuttaTimeVaryingTest {
|
||||
private static Matrix<N1, N1> rungeKuttaTimeVaryingSolution(double t) {
|
||||
return new MatBuilder<>(Nat.N1(), Nat.N1())
|
||||
.fill(12.0 * Math.exp(t) / (Math.pow(Math.exp(t) + 1.0, 2.0)));
|
||||
}
|
||||
|
||||
// Tests RK4 with a time varying solution. From
|
||||
// http://www2.hawaii.edu/~jmcfatri/math407/RungeKuttaTest.html:
|
||||
// x' = x (2 / (e^t + 1) - 1)
|
||||
//
|
||||
// The true (analytical) solution is:
|
||||
//
|
||||
// x(t) = 12 * e^t / ((e^t + 1)^2)
|
||||
@Test
|
||||
public void rungeKuttaTimeVaryingTest() {
|
||||
final var y0 = rungeKuttaTimeVaryingSolution(5.0);
|
||||
|
||||
final var y1 =
|
||||
RungeKuttaTimeVarying.rungeKuttaTimeVarying(
|
||||
(Double t, Matrix<N1, N1> x) -> {
|
||||
return new MatBuilder<>(Nat.N1(), Nat.N1())
|
||||
.fill(x.get(0, 0) * (2.0 / (Math.exp(t) + 1.0) - 1.0));
|
||||
},
|
||||
5.0,
|
||||
y0,
|
||||
1.0);
|
||||
assertEquals(rungeKuttaTimeVaryingSolution(6.0).get(0, 0), y1.get(0, 0), 1e-3);
|
||||
}
|
||||
}
|
||||
@@ -10,6 +10,7 @@
|
||||
#include "Eigen/Eigenvalues"
|
||||
#include "frc/system/Discretization.h"
|
||||
#include "frc/system/NumericalIntegration.h"
|
||||
#include "frc/system/RungeKuttaTimeVarying.h"
|
||||
|
||||
// Check that for a simple second-order system that we can easily analyze
|
||||
// analytically,
|
||||
@@ -26,8 +27,8 @@ TEST(DiscretizationTest, DiscretizeA) {
|
||||
|
||||
// We now have pos = vel = 1 and accel = 0, which should give us:
|
||||
Eigen::Matrix<double, 2, 1> x1Truth;
|
||||
x1Truth(1) = x0(1);
|
||||
x1Truth(0) = x0(0) + 1.0 * x0(1);
|
||||
x1Truth(0) = 1.0 * x0(0) + 1.0 * x0(1);
|
||||
x1Truth(1) = 0.0 * x0(0) + 1.0 * x0(1);
|
||||
|
||||
EXPECT_EQ(x1Truth, x1Discrete);
|
||||
}
|
||||
@@ -53,8 +54,8 @@ TEST(DiscretizationTest, DiscretizeAB) {
|
||||
|
||||
// We now have pos = vel = accel = 1, which should give us:
|
||||
Eigen::Matrix<double, 2, 1> x1Truth;
|
||||
x1Truth(1) = x0(1) + 1.0 * u(0);
|
||||
x1Truth(0) = x0(0) + 1.0 * x0(1) + 0.5 * u(0);
|
||||
x1Truth(0) = 1.0 * x0(0) + 1.0 * x0(1) + 0.5 * u(0);
|
||||
x1Truth(1) = 0.0 * x0(0) + 1.0 * x0(1) + 1.0 * u(0);
|
||||
|
||||
EXPECT_EQ(x1Truth, x1Discrete);
|
||||
}
|
||||
@@ -79,7 +80,7 @@ TEST(DiscretizationTest, DiscretizeSlowModelAQ) {
|
||||
(contA * t.to<double>()).exp() * contQ *
|
||||
(contA.transpose() * t.to<double>()).exp());
|
||||
},
|
||||
Eigen::Matrix<double, 2, 2>::Zero(), 0_s, dt);
|
||||
0_s, Eigen::Matrix<double, 2, 2>::Zero(), dt);
|
||||
|
||||
Eigen::Matrix<double, 2, 2> discA;
|
||||
Eigen::Matrix<double, 2, 2> discQ;
|
||||
@@ -100,7 +101,7 @@ TEST(DiscretizationTest, DiscretizeFastModelAQ) {
|
||||
Eigen::Matrix<double, 2, 2> contQ;
|
||||
contQ << 0.0025, 0, 0, 1;
|
||||
|
||||
constexpr auto dt = 5.05_ms;
|
||||
constexpr auto dt = 5_ms;
|
||||
|
||||
Eigen::Matrix<double, 2, 2> discQIntegrated = frc::RungeKuttaTimeVarying<
|
||||
std::function<Eigen::Matrix<double, 2, 2>(
|
||||
@@ -111,7 +112,7 @@ TEST(DiscretizationTest, DiscretizeFastModelAQ) {
|
||||
(contA * t.to<double>()).exp() * contQ *
|
||||
(contA.transpose() * t.to<double>()).exp());
|
||||
},
|
||||
Eigen::Matrix<double, 2, 2>::Zero(), 0_s, dt);
|
||||
0_s, Eigen::Matrix<double, 2, 2>::Zero(), dt);
|
||||
|
||||
Eigen::Matrix<double, 2, 2> discA;
|
||||
Eigen::Matrix<double, 2, 2> discQ;
|
||||
@@ -128,9 +129,6 @@ TEST(DiscretizationTest, DiscretizeSlowModelAQTaylor) {
|
||||
Eigen::Matrix<double, 2, 2> contA;
|
||||
contA << 0, 1, 0, 0;
|
||||
|
||||
Eigen::Matrix<double, 2, 1> contB;
|
||||
contB << 0, 1;
|
||||
|
||||
Eigen::Matrix<double, 2, 2> contQ;
|
||||
contQ << 1, 0, 0, 1;
|
||||
|
||||
@@ -139,12 +137,11 @@ TEST(DiscretizationTest, DiscretizeSlowModelAQTaylor) {
|
||||
Eigen::Matrix<double, 2, 2> discQTaylor;
|
||||
Eigen::Matrix<double, 2, 2> discA;
|
||||
Eigen::Matrix<double, 2, 2> discATaylor;
|
||||
Eigen::Matrix<double, 2, 1> discB;
|
||||
|
||||
// Continuous Q should be positive semidefinite
|
||||
Eigen::SelfAdjointEigenSolver<Eigen::MatrixXd> esCont(contQ);
|
||||
for (int i = 0; i < contQ.rows(); i++) {
|
||||
EXPECT_GT(esCont.eigenvalues()[i], 0);
|
||||
for (int i = 0; i < contQ.rows(); ++i) {
|
||||
EXPECT_GE(esCont.eigenvalues()[i], 0);
|
||||
}
|
||||
|
||||
Eigen::Matrix<double, 2, 2> discQIntegrated = frc::RungeKuttaTimeVarying<
|
||||
@@ -156,9 +153,9 @@ TEST(DiscretizationTest, DiscretizeSlowModelAQTaylor) {
|
||||
(contA * t.to<double>()).exp() * contQ *
|
||||
(contA.transpose() * t.to<double>()).exp());
|
||||
},
|
||||
Eigen::Matrix<double, 2, 2>::Zero(), 0_s, dt);
|
||||
0_s, Eigen::Matrix<double, 2, 2>::Zero(), dt);
|
||||
|
||||
frc::DiscretizeAB<2, 1>(contA, contB, dt, &discA, &discB);
|
||||
frc::DiscretizeA<2>(contA, dt, &discA);
|
||||
frc::DiscretizeAQTaylor<2>(contA, contQ, dt, &discATaylor, &discQTaylor);
|
||||
|
||||
EXPECT_LT((discQIntegrated - discQTaylor).norm(), 1e-10)
|
||||
@@ -169,8 +166,8 @@ TEST(DiscretizationTest, DiscretizeSlowModelAQTaylor) {
|
||||
|
||||
// Discrete Q should be positive semidefinite
|
||||
Eigen::SelfAdjointEigenSolver<Eigen::MatrixXd> esDisc(discQTaylor);
|
||||
for (int i = 0; i < discQTaylor.rows(); i++) {
|
||||
EXPECT_GT(esDisc.eigenvalues()[i], 0);
|
||||
for (int i = 0; i < discQTaylor.rows(); ++i) {
|
||||
EXPECT_GE(esDisc.eigenvalues()[i], 0);
|
||||
}
|
||||
}
|
||||
|
||||
@@ -179,23 +176,19 @@ TEST(DiscretizationTest, DiscretizeFastModelAQTaylor) {
|
||||
Eigen::Matrix<double, 2, 2> contA;
|
||||
contA << 0, 1, 0, -1500;
|
||||
|
||||
Eigen::Matrix<double, 2, 1> contB;
|
||||
contB << 0, 1;
|
||||
|
||||
Eigen::Matrix<double, 2, 2> contQ;
|
||||
contQ << 0.0025, 0, 0, 1;
|
||||
|
||||
constexpr auto dt = 5.05_ms;
|
||||
constexpr auto dt = 5_ms;
|
||||
|
||||
Eigen::Matrix<double, 2, 2> discQTaylor;
|
||||
Eigen::Matrix<double, 2, 2> discA;
|
||||
Eigen::Matrix<double, 2, 2> discATaylor;
|
||||
Eigen::Matrix<double, 2, 1> discB;
|
||||
|
||||
// Continuous Q should be positive semidefinite
|
||||
Eigen::SelfAdjointEigenSolver<Eigen::MatrixXd> esCont(contQ);
|
||||
for (int i = 0; i < contQ.rows(); i++) {
|
||||
EXPECT_GT(esCont.eigenvalues()[i], 0);
|
||||
for (int i = 0; i < contQ.rows(); ++i) {
|
||||
EXPECT_GE(esCont.eigenvalues()[i], 0);
|
||||
}
|
||||
|
||||
Eigen::Matrix<double, 2, 2> discQIntegrated = frc::RungeKuttaTimeVarying<
|
||||
@@ -207,9 +200,9 @@ TEST(DiscretizationTest, DiscretizeFastModelAQTaylor) {
|
||||
(contA * t.to<double>()).exp() * contQ *
|
||||
(contA.transpose() * t.to<double>()).exp());
|
||||
},
|
||||
Eigen::Matrix<double, 2, 2>::Zero(), 0_s, dt);
|
||||
0_s, Eigen::Matrix<double, 2, 2>::Zero(), dt);
|
||||
|
||||
frc::DiscretizeAB<2, 1>(contA, contB, dt, &discA, &discB);
|
||||
frc::DiscretizeA<2>(contA, dt, &discA);
|
||||
frc::DiscretizeAQTaylor<2>(contA, contQ, dt, &discATaylor, &discQTaylor);
|
||||
|
||||
EXPECT_LT((discQIntegrated - discQTaylor).norm(), 1e-3)
|
||||
@@ -220,8 +213,8 @@ TEST(DiscretizationTest, DiscretizeFastModelAQTaylor) {
|
||||
|
||||
// Discrete Q should be positive semidefinite
|
||||
Eigen::SelfAdjointEigenSolver<Eigen::MatrixXd> esDisc(discQTaylor);
|
||||
for (int i = 0; i < discQTaylor.rows(); i++) {
|
||||
EXPECT_GT(esDisc.eigenvalues()[i], 0);
|
||||
for (int i = 0; i < discQTaylor.rows(); ++i) {
|
||||
EXPECT_GE(esDisc.eigenvalues()[i], 0);
|
||||
}
|
||||
}
|
||||
|
||||
|
||||
@@ -67,32 +67,3 @@ TEST(NumericalIntegrationTest, ExponentialRKDP) {
|
||||
y0, (Eigen::Matrix<double, 1, 1>() << 0.0).finished(), 0.1_s);
|
||||
EXPECT_NEAR(y1(0), std::exp(0.1) - std::exp(0), 1e-3);
|
||||
}
|
||||
|
||||
namespace {
|
||||
Eigen::Matrix<double, 1, 1> RungeKuttaTimeVaryingSolution(double t) {
|
||||
return (Eigen::Matrix<double, 1, 1>()
|
||||
<< 12.0 * std::exp(t) / (std::pow(std::exp(t) + 1.0, 2.0)))
|
||||
.finished();
|
||||
}
|
||||
} // namespace
|
||||
|
||||
// Tests RungeKutta with a time varying solution.
|
||||
// Now, lets test RK4 with a time varying solution. From
|
||||
// http://www2.hawaii.edu/~jmcfatri/math407/RungeKuttaTest.html:
|
||||
// x' = x (2 / (e^t + 1) - 1)
|
||||
//
|
||||
// The true (analytical) solution is:
|
||||
//
|
||||
// x(t) = 12 * e^t / ((e^t + 1)^2)
|
||||
TEST(NumericalIntegrationTest, RungeKuttaTimeVarying) {
|
||||
Eigen::Matrix<double, 1, 1> y0 = RungeKuttaTimeVaryingSolution(5.0);
|
||||
|
||||
Eigen::Matrix<double, 1, 1> y1 = frc::RungeKuttaTimeVarying(
|
||||
[](units::second_t t, Eigen::Matrix<double, 1, 1> x) {
|
||||
return (Eigen::Matrix<double, 1, 1>()
|
||||
<< x(0) * (2.0 / (std::exp(t.to<double>()) + 1.0) - 1.0))
|
||||
.finished();
|
||||
},
|
||||
y0, 5_s, 1_s);
|
||||
EXPECT_NEAR(y1(0), RungeKuttaTimeVaryingSolution(6.0)(0), 1e-3);
|
||||
}
|
||||
|
||||
@@ -0,0 +1,37 @@
|
||||
// Copyright (c) FIRST and other WPILib contributors.
|
||||
// Open Source Software; you can modify and/or share it under the terms of
|
||||
// the WPILib BSD license file in the root directory of this project.
|
||||
|
||||
#include <gtest/gtest.h>
|
||||
|
||||
#include <cmath>
|
||||
|
||||
#include "frc/system/RungeKuttaTimeVarying.h"
|
||||
|
||||
namespace {
|
||||
Eigen::Matrix<double, 1, 1> RungeKuttaTimeVaryingSolution(double t) {
|
||||
return (Eigen::Matrix<double, 1, 1>()
|
||||
<< 12.0 * std::exp(t) / (std::pow(std::exp(t) + 1.0, 2.0)))
|
||||
.finished();
|
||||
}
|
||||
} // namespace
|
||||
|
||||
// Tests RK4 with a time varying solution. From
|
||||
// http://www2.hawaii.edu/~jmcfatri/math407/RungeKuttaTest.html:
|
||||
// x' = x (2 / (e^t + 1) - 1)
|
||||
//
|
||||
// The true (analytical) solution is:
|
||||
//
|
||||
// x(t) = 12 * e^t / ((e^t + 1)^2)
|
||||
TEST(RungeKuttaTimeVaryingTest, RungeKuttaTimeVarying) {
|
||||
Eigen::Matrix<double, 1, 1> y0 = RungeKuttaTimeVaryingSolution(5.0);
|
||||
|
||||
Eigen::Matrix<double, 1, 1> y1 = frc::RungeKuttaTimeVarying(
|
||||
[](units::second_t t, Eigen::Matrix<double, 1, 1> x) {
|
||||
return (Eigen::Matrix<double, 1, 1>()
|
||||
<< x(0) * (2.0 / (std::exp(t.to<double>()) + 1.0) - 1.0))
|
||||
.finished();
|
||||
},
|
||||
5_s, y0, 1_s);
|
||||
EXPECT_NEAR(y1(0), RungeKuttaTimeVaryingSolution(6.0)(0), 1e-3);
|
||||
}
|
||||
@@ -0,0 +1,34 @@
|
||||
// Copyright (c) FIRST and other WPILib contributors.
|
||||
// Open Source Software; you can modify and/or share it under the terms of
|
||||
// the WPILib BSD license file in the root directory of this project.
|
||||
|
||||
#pragma once
|
||||
|
||||
#include <array>
|
||||
|
||||
#include "Eigen/Core"
|
||||
#include "units/time.h"
|
||||
|
||||
namespace frc {
|
||||
|
||||
/**
|
||||
* Performs 4th order Runge-Kutta integration of dy/dt = f(t, y) for dt.
|
||||
*
|
||||
* @param f The function to integrate. It must take two arguments t and y.
|
||||
* @param t The initial value of t.
|
||||
* @param y The initial value of y.
|
||||
* @param dt The time over which to integrate.
|
||||
*/
|
||||
template <typename F, typename T>
|
||||
T RungeKuttaTimeVarying(F&& f, units::second_t t, T y, units::second_t dt) {
|
||||
const auto h = dt.to<double>();
|
||||
|
||||
T k1 = f(t, y);
|
||||
T k2 = f(t + dt * 0.5, y + h * k1 * 0.5);
|
||||
T k3 = f(t + dt * 0.5, y + h * k2 * 0.5);
|
||||
T k4 = f(t + dt, y + h * k3);
|
||||
|
||||
return y + h / 6.0 * (k1 + 2.0 * k2 + 2.0 * k3 + k4);
|
||||
}
|
||||
|
||||
} // namespace frc
|
||||
Reference in New Issue
Block a user