Changes from mwork PC.

PDP 2025

MPI analysis

new focus on database and SQL

Functions/Metrics/calc_air_plain.m

@@ -0,0 +1,40 @@
+function [airs] = calc_air_plain(noisy_signal,reference_signal,options)
+    % Calculation of AIR acc. to J. Kozesnik, „Numerically Computing Achievable Rates of  Memoryless Channels“, Francisco Javier Garcıa-Gomez,  doi: 10.1007/978-94-009-9857-5.
+    % Implementation is not accessible, I mailed TUM to get the code...
+
+    arguments(Input)
+        noisy_signal;
+        reference_signal;
+        options.skip_front = 0;
+        options.skip_end = 0;
+        options.returnErrorLocation = 0;
+    end
+    
+    options.skip_end = abs(options.skip_end);
+    options.skip_front = abs(options.skip_front);
+    
+    assert((options.skip_end+options.skip_front)<length(noisy_signal),"You can not skip more bits than overall length of data! Set skip_front or skip_end to lower value or check data_in");
+    
+    % TRIM
+    [noisy_signal,reference_signal]=trimseq(noisy_signal,reference_signal,options.skip_front,options.skip_end);
+    
+    % CALC EVM
+    %%% new implementation of AIR
+    constellation = unique(reference_signal);
+    reference_idx = arrayfun(@(x) find(constellation == x, 1), reference_signal);
+    air = air_garcia_implementation(constellation',noisy_signal',reference_idx');
+    
+    
+    function [data_,reference_]=trimseq(data,reference,skipstart,skip_end)
+    
+        data_  =  data(skipstart+1:end-skip_end,:);
+        
+        delta_bits = length(reference) - length(data);
+        
+        skip_end = delta_bits + skip_end;
+        
+        reference_ = reference(skipstart+1:end-skip_end,:);
+    
+    end
+
+end

Functions/Metrics/calc_snr.m

@@ -0,0 +1,36 @@
+function [snr_all, snr_per_level] = calc_snr(tx_signal, eq_noise)
+% CALC_SNR Calculates overall SNR and level-wise SNR for a PAM-M constellation.
+%
+%   [snr_all, snr_per_level] = calc_snr(tx_signal, eq_noise)
+%
+%   Inputs:
+%       tx_signal - Vector of transmitted signal values.
+%       eq_noise  - Vector of corresponding noise samples.
+%
+%   Outputs:
+%       snr_all       - Overall SNR computed using all signal values.
+%       snr_per_level - A vector where each element is the SNR computed
+%                       for a unique amplitude level in tx_signal.
+%
+%   The function first computes the overall SNR using the full signal vectors.
+%   Then it uses the unique levels in tx_signal to calculate the SNR for
+%   the symbols corresponding to each level separately.
+
+    % Calculate overall SNR using the complete signals
+    snr_all = snr(tx_signal, eq_noise);
+
+    % Get the unique amplitude levels in the transmitted signal
+    levels = unique(tx_signal);
+    
+    % Preallocate an array to store the SNR for each unique level
+    snr_per_level = zeros(size(levels));
+    
+    % Loop over each unique level to compute the SNR for that level
+    for i = 1:length(levels)
+        % Find indices where tx_signal equals the current level
+        idx = (tx_signal == levels(i));
+        
+        % Compute the SNR for these indices
+        snr_per_level(i) = snr(tx_signal(idx), eq_noise(idx));
+    end
+end