mirror of
https://github.com/wpilibsuite/allwpilib
synced 2026-06-23 01:21:42 +00:00
Co-authored-by: Tyler Veness <calcmogul@gmail.com> Co-authored-by: Claudius Tewari <cttewari@gmail.com> Co-authored-by: Declan Freeman-Gleason <declanfreemangleason@gmail.com>
423 lines
17 KiB
C++
423 lines
17 KiB
C++
/*----------------------------------------------------------------------------*/
|
|
/* Copyright (c) 2020 FIRST. All Rights Reserved. */
|
|
/* Open Source Software - may be modified and shared by FRC teams. The code */
|
|
/* must be accompanied by the FIRST BSD license file in the root directory of */
|
|
/* the project. */
|
|
/*----------------------------------------------------------------------------*/
|
|
|
|
#pragma once
|
|
|
|
#include <array>
|
|
|
|
#include "Eigen/Core"
|
|
#include "Eigen/QR"
|
|
#include "drake/math/discrete_algebraic_riccati_equation.h"
|
|
#include "frc/StateSpaceUtil.h"
|
|
#include "frc/system/Discretization.h"
|
|
#include "frc/system/LinearSystem.h"
|
|
#include "units/time.h"
|
|
|
|
namespace frc {
|
|
namespace detail {
|
|
|
|
/**
|
|
* Contains the controller coefficients and logic for a linear-quadratic
|
|
* regulator (LQR).
|
|
* LQRs use the control law u = K(r - x).
|
|
*
|
|
* For more on the underlying math, read
|
|
* https://file.tavsys.net/control/controls-engineering-in-frc.pdf.
|
|
*/
|
|
template <int States, int Inputs>
|
|
class LinearQuadraticRegulatorImpl {
|
|
public:
|
|
/**
|
|
* Constructs a controller with the given coefficients and plant.
|
|
*
|
|
* @param plant The plant being controlled.
|
|
* @param Qelems The maximum desired error tolerance for each state.
|
|
* @param Relems The maximum desired control effort for each input.
|
|
* @param dt Discretization timestep.
|
|
*/
|
|
template <int Outputs>
|
|
LinearQuadraticRegulatorImpl(
|
|
const LinearSystem<States, Inputs, Outputs>& plant,
|
|
const std::array<double, States>& Qelems,
|
|
const std::array<double, Inputs>& Relems, units::second_t dt)
|
|
: LinearQuadraticRegulatorImpl(plant.A(), plant.B(), Qelems, 1.0, Relems,
|
|
dt) {}
|
|
|
|
/**
|
|
* Constructs a controller with the given coefficients and plant.
|
|
*
|
|
* @param plant The plant being controlled.
|
|
* @param Qelems The maximum desired error tolerance for each state.
|
|
* @param rho A weighting factor that balances control effort and state
|
|
* excursion. Greater values penalize state excursion more heavily. 1 is a
|
|
* good starting value.
|
|
* @param Relems The maximum desired control effort for each input.
|
|
* @param dt Discretization timestep.
|
|
*/
|
|
template <int Outputs>
|
|
LinearQuadraticRegulatorImpl(
|
|
const LinearSystem<States, Inputs, Outputs>& plant,
|
|
const std::array<double, States>& Qelems, const double rho,
|
|
const std::array<double, Inputs>& Relems, units::second_t dt)
|
|
: LinearQuadraticRegulatorImpl(plant.A(), plant.B(), Qelems, rho, Relems,
|
|
dt) {}
|
|
|
|
/**
|
|
* Constructs a controller with the given coefficients and plant.
|
|
*
|
|
* @param A Continuous system matrix of the plant being controlled.
|
|
* @param B Continuous input matrix of the plant being controlled.
|
|
* @param Qelems The maximum desired error tolerance for each state.
|
|
* @param rho A weighting factor that balances control effort and state
|
|
* excursion. Greater values penalize state excursion more heavily. 1 is a
|
|
* good starting value.
|
|
* @param Relems The maximum desired control effort for each input.
|
|
* @param dt Discretization timestep.
|
|
*/
|
|
LinearQuadraticRegulatorImpl(const Eigen::Matrix<double, States, States>& A,
|
|
const Eigen::Matrix<double, States, Inputs>& B,
|
|
const std::array<double, States>& Qelems,
|
|
const std::array<double, Inputs>& Relems,
|
|
units::second_t dt)
|
|
: LinearQuadraticRegulatorImpl(A, B, Qelems, 1.0, Relems, dt) {}
|
|
|
|
/**
|
|
* Constructs a controller with the given coefficients and plant.
|
|
*
|
|
* @param A Continuous system matrix of the plant being controlled.
|
|
* @param B Continuous input matrix of the plant being controlled.
|
|
* @param Qelems The maximum desired error tolerance for each state.
|
|
* @param rho A weighting factor that balances control effort and state
|
|
* excursion. Greater values penalize state excursion more heavily. 1 is a
|
|
* good starting value.
|
|
* @param Relems The maximum desired control effort for each input.
|
|
* @param dt Discretization timestep.
|
|
*/
|
|
LinearQuadraticRegulatorImpl(const Eigen::Matrix<double, States, States>& A,
|
|
const Eigen::Matrix<double, States, Inputs>& B,
|
|
const std::array<double, States>& Qelems,
|
|
const double rho,
|
|
const std::array<double, Inputs>& Relems,
|
|
units::second_t dt)
|
|
: LinearQuadraticRegulatorImpl(A, B, MakeCostMatrix(Qelems) * rho,
|
|
MakeCostMatrix(Relems), dt) {}
|
|
|
|
/**
|
|
* Constructs a controller with the given coefficients and plant.
|
|
*
|
|
* @param A Continuous system matrix of the plant being controlled.
|
|
* @param B Continuous input matrix of the plant being controlled.
|
|
* @param Q The state cost matrix.
|
|
* @param R The input cost matrix.
|
|
* @param dt Discretization timestep.
|
|
*/
|
|
LinearQuadraticRegulatorImpl(const Eigen::Matrix<double, States, States>& A,
|
|
const Eigen::Matrix<double, States, Inputs>& B,
|
|
const Eigen::Matrix<double, States, States>& Q,
|
|
const Eigen::Matrix<double, Inputs, Inputs>& R,
|
|
units::second_t dt) {
|
|
Eigen::Matrix<double, States, States> discA;
|
|
Eigen::Matrix<double, States, Inputs> discB;
|
|
DiscretizeAB<States, Inputs>(A, B, dt, &discA, &discB);
|
|
|
|
Eigen::Matrix<double, States, States> S =
|
|
drake::math::DiscreteAlgebraicRiccatiEquation(discA, discB, Q, R);
|
|
Eigen::Matrix<double, Inputs, Inputs> tmp =
|
|
discB.transpose() * S * discB + R;
|
|
m_K = tmp.llt().solve(discB.transpose() * S * discA);
|
|
|
|
Reset();
|
|
}
|
|
|
|
LinearQuadraticRegulatorImpl(LinearQuadraticRegulatorImpl&&) = default;
|
|
LinearQuadraticRegulatorImpl& operator=(LinearQuadraticRegulatorImpl&&) =
|
|
default;
|
|
|
|
/**
|
|
* Returns the controller matrix K.
|
|
*/
|
|
const Eigen::Matrix<double, Inputs, States>& K() const { return m_K; }
|
|
|
|
/**
|
|
* Returns an element of the controller matrix K.
|
|
*
|
|
* @param i Row of K.
|
|
* @param j Column of K.
|
|
*/
|
|
double K(int i, int j) const { return m_K(i, j); }
|
|
|
|
/**
|
|
* Returns the reference vector r.
|
|
*
|
|
* @return The reference vector.
|
|
*/
|
|
const Eigen::Matrix<double, States, 1>& R() const { return m_r; }
|
|
|
|
/**
|
|
* Returns an element of the reference vector r.
|
|
*
|
|
* @param i Row of r.
|
|
*
|
|
* @return The row of the reference vector.
|
|
*/
|
|
double R(int i) const { return m_r(i, 0); }
|
|
|
|
/**
|
|
* Returns the control input vector u.
|
|
*
|
|
* @return The control input.
|
|
*/
|
|
const Eigen::Matrix<double, Inputs, 1>& U() const { return m_u; }
|
|
|
|
/**
|
|
* Returns an element of the control input vector u.
|
|
*
|
|
* @param i Row of u.
|
|
*
|
|
* @return The row of the control input vector.
|
|
*/
|
|
double U(int i) const { return m_u(i, 0); }
|
|
|
|
/**
|
|
* Resets the controller.
|
|
*/
|
|
void Reset() {
|
|
m_r.setZero();
|
|
m_u.setZero();
|
|
}
|
|
|
|
/**
|
|
* Returns the next output of the controller.
|
|
*
|
|
* @param x The current state x.
|
|
*/
|
|
Eigen::Matrix<double, Inputs, 1> Calculate(
|
|
const Eigen::Matrix<double, States, 1>& x) {
|
|
m_u = m_K * (m_r - x);
|
|
return m_u;
|
|
}
|
|
|
|
/**
|
|
* Returns the next output of the controller.
|
|
*
|
|
* @param x The current state x.
|
|
* @param nextR The next reference vector r.
|
|
*/
|
|
Eigen::Matrix<double, Inputs, 1> Calculate(
|
|
const Eigen::Matrix<double, States, 1>& x,
|
|
const Eigen::Matrix<double, States, 1>& nextR) {
|
|
m_r = nextR;
|
|
return Calculate(x);
|
|
}
|
|
|
|
private:
|
|
// Current reference
|
|
Eigen::Matrix<double, States, 1> m_r;
|
|
|
|
// Computed controller output
|
|
Eigen::Matrix<double, Inputs, 1> m_u;
|
|
|
|
// Controller gain
|
|
Eigen::Matrix<double, Inputs, States> m_K;
|
|
};
|
|
|
|
} // namespace detail
|
|
|
|
template <int States, int Inputs>
|
|
class LinearQuadraticRegulator
|
|
: public detail::LinearQuadraticRegulatorImpl<States, Inputs> {
|
|
public:
|
|
/**
|
|
* Constructs a controller with the given coefficients and plant.
|
|
*
|
|
* @param system The plant being controlled.
|
|
* @param Qelems The maximum desired error tolerance for each state.
|
|
* @param Relems The maximum desired control effort for each input.
|
|
* @param dt Discretization timestep.
|
|
*/
|
|
template <int Outputs>
|
|
LinearQuadraticRegulator(const LinearSystem<States, Inputs, Outputs>& plant,
|
|
const std::array<double, States>& Qelems,
|
|
const std::array<double, Inputs>& Relems,
|
|
units::second_t dt)
|
|
: LinearQuadraticRegulator(plant.A(), plant.B(), Qelems, 1.0, Relems,
|
|
dt) {}
|
|
|
|
/**
|
|
* Constructs a controller with the given coefficients and plant.
|
|
*
|
|
* @param system The plant being controlled.
|
|
* @param Qelems The maximum desired error tolerance for each state.
|
|
* @param rho A weighting factor that balances control effort and state
|
|
* excursion. Greater values penalize state excursion more heavily. 1 is a
|
|
* good starting value.
|
|
* @param Relems The maximum desired control effort for each input.
|
|
* @param dt Discretization timestep.
|
|
*/
|
|
template <int Outputs>
|
|
LinearQuadraticRegulator(const LinearSystem<States, Inputs, Outputs>& plant,
|
|
const std::array<double, States>& Qelems,
|
|
const double rho,
|
|
const std::array<double, Inputs>& Relems,
|
|
units::second_t dt)
|
|
: LinearQuadraticRegulator(plant.A(), plant.B(), Qelems, rho, Relems,
|
|
dt) {}
|
|
|
|
/**
|
|
* Constructs a controller with the given coefficients and plant.
|
|
*
|
|
* @param A Continuous system matrix of the plant being controlled.
|
|
* @param B Continuous input matrix of the plant being controlled.
|
|
* @param Qelems The maximum desired error tolerance for each state.
|
|
* @param rho A weighting factor that balances control effort and state
|
|
* excursion. Greater values penalize state excursion more heavily. 1 is a
|
|
* good starting value.
|
|
* @param Relems The maximum desired control effort for each input.
|
|
* @param dt Discretization timestep.
|
|
*/
|
|
LinearQuadraticRegulator(const Eigen::Matrix<double, States, States>& A,
|
|
const Eigen::Matrix<double, States, Inputs>& B,
|
|
const std::array<double, States>& Qelems,
|
|
const std::array<double, Inputs>& Relems,
|
|
units::second_t dt)
|
|
: LinearQuadraticRegulator(A, B, Qelems, 1.0, Relems, dt) {}
|
|
|
|
/**
|
|
* Constructs a controller with the given coefficients and plant.
|
|
*
|
|
* @param A Continuous system matrix of the plant being controlled.
|
|
* @param B Continuous input matrix of the plant being controlled.
|
|
* @param Qelems The maximum desired error tolerance for each state.
|
|
* @param rho A weighting factor that balances control effort and state
|
|
* excursion. Greater values penalize state excursion more heavily. 1 is a
|
|
* good starting value.
|
|
* @param Relems The maximum desired control effort for each input.
|
|
* @param dt Discretization timestep.
|
|
*/
|
|
LinearQuadraticRegulator(const Eigen::Matrix<double, States, States>& A,
|
|
const Eigen::Matrix<double, States, Inputs>& B,
|
|
const std::array<double, States>& Qelems,
|
|
const double rho,
|
|
const std::array<double, Inputs>& Relems,
|
|
units::second_t dt)
|
|
: detail::LinearQuadraticRegulatorImpl<States, Inputs>{
|
|
A, B, Qelems, rho, Relems, dt} {}
|
|
|
|
/**
|
|
* Constructs a controller with the given coefficients and plant.
|
|
*
|
|
* @param A Continuous system matrix of the plant being controlled.
|
|
* @param B Continuous input matrix of the plant being controlled.
|
|
* @param Q The state cost matrix.
|
|
* @param R The input cost matrix.
|
|
* @param dt Discretization timestep.
|
|
*/
|
|
LinearQuadraticRegulator(const Eigen::Matrix<double, States, States>& A,
|
|
const Eigen::Matrix<double, States, Inputs>& B,
|
|
const Eigen::Matrix<double, States, States>& Q,
|
|
const Eigen::Matrix<double, Inputs, Inputs>& R,
|
|
units::second_t dt)
|
|
: detail::LinearQuadraticRegulatorImpl<States, Inputs>{A, B, Q, R, dt} {}
|
|
|
|
LinearQuadraticRegulator(LinearQuadraticRegulator&&) = default;
|
|
LinearQuadraticRegulator& operator=(LinearQuadraticRegulator&&) = default;
|
|
};
|
|
|
|
// Template specializations are used here to make common state-input pairs
|
|
// compile faster.
|
|
template <>
|
|
class LinearQuadraticRegulator<1, 1>
|
|
: public detail::LinearQuadraticRegulatorImpl<1, 1> {
|
|
public:
|
|
template <int Outputs>
|
|
LinearQuadraticRegulator(const LinearSystem<1, 1, Outputs>& plant,
|
|
const std::array<double, 1>& Qelems,
|
|
const std::array<double, 1>& Relems,
|
|
units::second_t dt)
|
|
: LinearQuadraticRegulator(plant.A(), plant.B(), Qelems, 1.0, Relems,
|
|
dt) {}
|
|
|
|
template <int Outputs>
|
|
LinearQuadraticRegulator(const LinearSystem<1, 1, Outputs>& plant,
|
|
const std::array<double, 1>& Qelems,
|
|
const double rho,
|
|
const std::array<double, 1>& Relems,
|
|
units::second_t dt)
|
|
: LinearQuadraticRegulator(plant.A(), plant.B(), Qelems, rho, Relems,
|
|
dt) {}
|
|
|
|
LinearQuadraticRegulator(const Eigen::Matrix<double, 1, 1>& A,
|
|
const Eigen::Matrix<double, 1, 1>& B,
|
|
const std::array<double, 1>& Qelems,
|
|
const std::array<double, 1>& Relems,
|
|
units::second_t dt);
|
|
|
|
LinearQuadraticRegulator(const Eigen::Matrix<double, 1, 1>& A,
|
|
const Eigen::Matrix<double, 1, 1>& B,
|
|
const std::array<double, 1>& Qelems,
|
|
const double rho,
|
|
const std::array<double, 1>& Relems,
|
|
units::second_t dt);
|
|
|
|
LinearQuadraticRegulator(const Eigen::Matrix<double, 1, 1>& A,
|
|
const Eigen::Matrix<double, 1, 1>& B,
|
|
const Eigen::Matrix<double, 1, 1>& Q,
|
|
const Eigen::Matrix<double, 1, 1>& R,
|
|
units::second_t dt);
|
|
|
|
LinearQuadraticRegulator(LinearQuadraticRegulator&&) = default;
|
|
LinearQuadraticRegulator& operator=(LinearQuadraticRegulator&&) = default;
|
|
};
|
|
|
|
// Template specializations are used here to make common state-input pairs
|
|
// compile faster.
|
|
template <>
|
|
class LinearQuadraticRegulator<2, 1>
|
|
: public detail::LinearQuadraticRegulatorImpl<2, 1> {
|
|
public:
|
|
template <int Outputs>
|
|
LinearQuadraticRegulator(const LinearSystem<2, 1, Outputs>& plant,
|
|
const std::array<double, 2>& Qelems,
|
|
const std::array<double, 1>& Relems,
|
|
units::second_t dt)
|
|
: LinearQuadraticRegulator(plant.A(), plant.B(), Qelems, 1.0, Relems,
|
|
dt) {}
|
|
|
|
template <int Outputs>
|
|
LinearQuadraticRegulator(const LinearSystem<2, 1, Outputs>& plant,
|
|
const std::array<double, 2>& Qelems,
|
|
const double rho,
|
|
const std::array<double, 1>& Relems,
|
|
units::second_t dt)
|
|
: LinearQuadraticRegulator(plant.A(), plant.B(), Qelems, rho, Relems,
|
|
dt) {}
|
|
|
|
LinearQuadraticRegulator(const Eigen::Matrix<double, 2, 2>& A,
|
|
const Eigen::Matrix<double, 2, 1>& B,
|
|
const std::array<double, 2>& Qelems,
|
|
const std::array<double, 1>& Relems,
|
|
units::second_t dt);
|
|
|
|
LinearQuadraticRegulator(const Eigen::Matrix<double, 2, 2>& A,
|
|
const Eigen::Matrix<double, 2, 1>& B,
|
|
const std::array<double, 2>& Qelems,
|
|
const double rho,
|
|
const std::array<double, 1>& Relems,
|
|
units::second_t dt);
|
|
|
|
LinearQuadraticRegulator(const Eigen::Matrix<double, 2, 2>& A,
|
|
const Eigen::Matrix<double, 2, 1>& B,
|
|
const Eigen::Matrix<double, 2, 2>& Q,
|
|
const Eigen::Matrix<double, 1, 1>& R,
|
|
units::second_t dt);
|
|
|
|
LinearQuadraticRegulator(LinearQuadraticRegulator&&) = default;
|
|
LinearQuadraticRegulator& operator=(LinearQuadraticRegulator&&) = default;
|
|
};
|
|
|
|
} // namespace frc
|