%% SL5
clc, clear
N1 = (-5:5:5)';
N2 = [1:5;2:2:10;primes(11)];
N3 = (1:4)'*(11:14);

N1(end:-1:1)
N2(:, 2:2:end)
N3(1:2:end, :)
N2(2, [2 4 5])

A = reshape(1:12, 3, 4).'
% or
A = zeros(3, 4), A(:) = 1:12, A = A.'

%% SL6
clc, clear
x = 1:20;
S = cumsum(x);
x2 = x(2:2:end);
L = cumsum(x2); % OR L = cumsum(x(2:2:end))
L(end)

plot(x, S, x2, L)

%% SL7
% C is correct

%% SL10
% D is correct
clc, clear

A = magic(6)
B = ones(size(A))
A([2:3 5], :) = B([1 1 1], :)
% or
A([2:3 5], :) = B(ones(1, 3), 1:6)

%% SL11
clc, clear
M(:, :, 1) = eye(3),
M(:, :, 2) = ones(3),
M(:, :, 3) = diag([2 3 5])

M(1:2, 1:2, 1) = NaN

%% SL26
clc, clear
clear; clc;        % clear Workspace
N  = 5; V = 40;    % period, sampling
mu = 0; sigma = 1; % normal distribution
C  = sqrt(2*pi); om0 = pi; % signal
t  = linspace(0, N*1, N*V);
n = mu + sigma*randn(1, N*V);
s_t = C*sin(2*om0*t) + n;
plot(t, s_t);

%% SL27
smin = -9/10; smax = pi/2;
sp_t_min = max(s_t, smin);
sp_t     = min(sp_t_min, smax);

close all; 
plot(t, s_t); hold on;
stem(t, sp_t, 'r');

%% SL31
clc, clear
X = zeros(1, 45);
X(6:15) = 1;
X(16:25) = 2;
X(25:end) = 2:-2/20:0;
stem(X, 'r');

% OR
X = [zeros(1, 5) ones(1, 10) 2*ones(1, 9) 2:-2/20:0];
stem(X, 'r');

