Synthetic parametric model

Description

Figure 1: System poles for different parameter values.

On this page you will find a synthetic parametric model with one parameter for which one can easily experiment with different system orders, values of the parameter, as well as different poles and residues (see Fig. 1). Also, the decay of the Hankel singular values can be changed indirectly through the parameter.

Model

We consider a dynamical system in the frequency domain given by its pole-residue form of the transfer function

$\begin{array}{rl}H(s,\epsilon )& =\sum _{k=1}^N\frac{r_k}{s-p_k}\\ & =\sum _{k=1}^N\frac{r_k}{s-(\epsilon a_k+j{b}_k)},\end{array}$

with $p_k=\epsilon a_k+j{b}_k$ the poles of the system, $j$ the imaginary unit, and $r_k$ the residues. The parameter $\epsilon$ is used to scale the real part of the system poles. We can write down the state-space realization of the system's transfer function as

$\begin{array}{r}H(s,\epsilon )=\hat{C}(s{I}_N-(\epsilon {\hat{A}}_{\epsilon }+{\hat{A}}_0){)}^{-1}\hat{B},\end{array}$

with the corresponding system matrices ${\hat{A}}_{\epsilon }\in {\mathbb{ℝ}}^{N\times N}$, ${\hat{A}}_0\in {\mathbb{ℂ}}^{N\times N}$, $\hat{B}\in {\mathbb{ℝ}}^N$, and ${\hat{C}}^T\in {\mathbb{ℂ}}^N$ given by

$\begin{array}{rl}\epsilon {\hat{A}}_{\epsilon }+{\hat{A}}_0& =\epsilon \left[\begin{array}{ccc}{a}_1& & \\ & \ddots & \\ & & a_N\end{array}\right]+\left[\begin{array}{ccc}j{b}_1& & \\ & \ddots & \\ & & j{b}_N\end{array}\right],\\ \hat{B}& ={\left[\begin{array}{ccc}1,& \dots ,& 1\end{array}\right]}^T,\\ \hat{C}& =\left[\begin{array}{ccc}{r}_1,& \dots ,& r_n\end{array}\right].\end{array}$

One notices that the system matrices ${\hat{A}}_0$ and $\hat{C}$ have complex entries. For rewriting the system with real matrices, we assume that $N$ is even, $N=2m$, and that all system poles are complex and ordered in complex conjugate pairs, i.e.,

$\begin{array}{rl}{p}_1& =\epsilon a_1+j{b}_1,\\ p_2& =\epsilon a_1-j{b}_1,\\ & \dots \\ p_{N-1}& =\epsilon a_m+j{b}_m,\\ p_N& =\epsilon a_m-j{b}_m.\end{array}$

Corresponding to the system poles, also the residues are written in complex conjugate pairs

$\begin{array}{rl}{r}_1& =c_1+j{d}_1,\\ r_2& =c_1-j{d}_1,\\ & \dots \\ r_{N-1}& =c_m+j{d}_m,\\ r_N& =c_m-j{d}_m.\end{array}$

Using this, the realization of the dynamical system can be written with matrices having real entries by

$\begin{array}{rlrlrlrl}{A}_{\epsilon }& =\left[\begin{array}{ccc}{A}_{\epsilon ,1}& & \\ & \ddots & \\ & & A_{\epsilon ,m}\end{array}\right],& A_0& =\left[\begin{array}{ccc}{A}_{0,1}& & \\ & \ddots & \\ & & A_{0,m}\end{array}\right],& B& =\left[\begin{array}{c}{B}_1\\ ⋮\\ B_m\end{array}\right],& C& =\left[\begin{array}{ccc}{C}_1,& \cdots ,& C_m\end{array}\right],\end{array}$

with $A_{\epsilon ,k}=\left[\begin{array}{cc}{a}_k& 0\\ 0& a_k\end{array}\right]$, $A_{0,k}=\left[\begin{array}{cc}0& b_k\\ -b_k& 0\end{array}\right]$, $B_k=\left[\begin{array}{c}2\\ 0\end{array}\right]$, $C_k=\left[\begin{array}{cc}{c}_k,& d_k\end{array}\right]$.

Figure 2: Frequency response of synthetic parametric system for different parameter values.

Numerical Values

Figure 3: Hankel singular values of synthetic parametric system for different parameter values.

We construct a system of order $N=100$. The numerical values for the different variables are

• $a_k$ equally spaced in the interval $[-10^3,-10]$,

• $b_k$ equally spaced in the interval $[10,10^3]$,

• $c_k=1$,

• $d_k=0$,

• $\epsilon \in [\frac{1}{50},1]$.

The frequency response of the transfer function $H(s,\epsilon )=C(s{I}_N-(\epsilon A_{\epsilon }+A_0){)}^{-1}B$ is plotted for parameter values $\epsilon \in [\frac{1}{50},\frac{1}{20},\frac{1}{10},\frac{1}{5},\frac{1}{2},1]$ in Fig. 2.

Other interesting plots result for small values of the parameter $\epsilon$. For example, for $\epsilon =\frac{1}{100}$ or $\frac{1}{1000}$, the peaks in the frequency response become more pronounced, since the poles move closer to the imaginary axis.

For $\epsilon \in [\frac{1}{50},\frac{1}{20},\frac{1}{10},\frac{1}{5},\frac{1}{2},1]$, we also plotted the decay of the Hankel singular values in Fig. 3. Notice that for small values of the parameter, the decay of the Hankel singular values is very slow.

Data and Scripts

This benchmark includes one data set. The matrices can be downloaded in the MatrixMarket format:

• Synth_matrices.tar.gz (1.28 kB)

The matrix name is used as an extension of the matrix file.

System data of arbitrary even order $N$ can be generated in MATLAB or Octave by the following script:

N = 100; % Order of the resulting system.

% Set coefficients.
a = -linspace(1e1, 1e3, N/2).';
b =  linspace(1e1, 1e3, N/2).';
c = ones(N/2, 1);
d = zeros(N/2, 1);

% Build 2x2 submatrices.
aa(1:2:N-1, 1) = a;
aa(2:2:N, 1)   = a;
bb(1:2:N-1, 1) = b;
bb(2:2:N-2, 1) = 0;

% Set up system matrices.
Ae = spdiags(aa, 0, N, N);
A0 = spdiags([0; bb], 1, N, N) + spdiags(-bb, -1, N, N);
B  = 2 * sparse(mod(1:N, 2)).';
C(1:2:N-1) = c.';
C(2:2:N)   = d.';
C          = sparse(C);

or in Python:

import numpy as np
import scipy.sparse as sps

N = 100  # Order of the resulting system.

# Set coefficients.
a = -np.linspace(1e1, 1e3, N//2)
b = np.linspace(1e1, 1e3, N//2)
c = np.ones(N//2)
d = np.zeros(N//2)

# Build 2x2 submatrices.
aa = np.empty(N)
aa[::2] = a
aa[1::2] = a
bb = np.zeros(N)
bb[::2] = b

# Set up system matrices.
Ae = sps.diags(aa, format='csc')
A0 = sps.diags([bb, -bb], [1, -1], (N, N), format='csc')
B = np.zeros((N, 1))
B[::2, :] = 2
C = np.empty((1, N))
C[0, ::2] = c
C[0, 1::2] = d

Beside that, the plots in Fig. 1 and Fig. 2 can be generated in MATLAB and Octave using the following script:

% Get residues of the system.
r(1:2:N-1, 1) = c + 1j * d;
r(2:2:N, 1)   = c - 1j * d;

ep = [1/50; 1/20; 1/10; 1/5; 1/2; 1]; % Parameter epsilon.
jw = 1j * linspace(0, 1.2e3, 5000).'; % Frequency grid.

% Computations for all given parameter values.
p   = zeros(2 * length(a), length(ep));
Hjw = zeros(length(ep), 5000);
for k = 1:length(ep)
    p(:, k)   = [ep(k) * a + 1j * b; ep(k) * a - 1j * b]; % Poles.
    [jww, pp] = meshgrid(jw, p(:, k));
    Hjw(k, :) = (r.') * (1 ./ (jww - pp)); % Frequency response.
end

% Plot poles.
figure;
plot(real(p), imag(p), '.', 'MarkerSize', 12);
xlabel('Re(p)');
ylabel('Im(p)');
legend( ...
    '\epsilon = 1/50', ...
    '\epsilon = 1/20', ...
    '\epsilon = 1/10', ...
    '\epsilon = 1/5', ...
    '\epsilon = 1/2', ...
    '\epsilon = 1');

% Plot frequency response.
figure;
loglog(imag(jw), abs(Hjw), 'LineWidth', 2);
axis tight;
xlim([6 1200]);
xlabel('frequency (rad/sec)');
ylabel('magnitude');
legend( ...
    '\epsilon = 1/50', ...
    '\epsilon = 1/20', ...
    '\epsilon = 1/10', ...
    '\epsilon = 1/5', ...
    '\epsilon = 1/2', ...
    '\epsilon = 1');

or in Python:

import matplotlib.pyplot as plt

# Get residues of the system.
r = np.empty(N, dtype=complex)
r[::2] = c + 1j * d
r[1::2] = c - 1j * d

ep = [1/50, 1/20, 1/10, 1/5, 1/2, 1]  # Parameter epsilon.
jw = 1j * np.geomspace(6, 1.2e3, 5000)  # Frequency grid.

# Computations for all given parameter values.
p = np.zeros((len(ep), N), dtype=complex)
Hjw = np.zeros((len(ep), len(jw)), dtype=complex)
for k, epk in enumerate(ep):
    # Poles.
    p[k, :N//2] = epk * a + 1j * b
    p[k, N//2:] = epk * a - 1j * b
    # Frequency response.
    Hjw[k, :] = (r / (jw[:, np.newaxis] - p[k])).sum(axis=1)

# Plot poles.
fig, ax = plt.subplots()
for k, epk in enumerate(ep):
    ax.plot(p[k].real, p[k].imag, '.', label=fr'$\varepsilon$ = {epk}')
ax.autoscale(tight=True)
ax.set_xlabel('Re(p)')
ax.set_ylabel('Im(p)')
ax.legend()

# Plot frequency response.
fig, ax = plt.subplots()
for k, epk in enumerate(ep):
    ax.loglog(jw.imag, np.abs(Hjw[k]), label=fr'$\varepsilon$ = {epk}', linewidth=2)
ax.autoscale(tight=True)
ax.set_xlabel('frequency (rad/sec)')
ax.set_ylabel('magnitude')
ax.legend()

Dimensions

System structure:

$\begin{array}{rl}\dot{x}(t)& =(\epsilon A_{\epsilon }+A_0)x(t)+Bu(t),\\ y(t)& =Cx(t)\end{array}$

System dimensions:

$A_{\epsilon }\in {\mathbb{ℝ}}^{N\times N}$, $A_0\in {\mathbb{ℝ}}^{N\times N}$, $B\in {\mathbb{ℝ}}^{N\times 1}$, $C\in {\mathbb{ℝ}}^{1\times N}$

System variants:

Synth_matrices: $N=100$, arbitrary even order $N$ by using the script

Citation

To cite this benchmark and its data:

The MORwiki Community, Synthetic parametric model. hosted at MORwiki - Model Order Reduction Wiki, 2005. https://modelreduction.org/morwiki/Synthetic_parametric_model

@MISC{morwiki_synth_pmodel,
  author =       {{The MORwiki Community}},
  title =        {Synthetic parametric model},
  howpublished = {hosted at {MORwiki} -- Model Order Reduction Wiki},
  url =          {https://modelreduction.org/morwiki/Synthetic_parametric_model},
  year =         2005
}

Contact

User:Ionita