/// <summary>
/// <para>Computes the power spectrum of input time-domain signal.</para>
/// <para>Chinese Simplified: 计算输入信号的功率频谱。</para>
/// </summary>
/// <param name="x">
/// <para>input time-domain signal.</para>
/// <para>Chinese Simplified: 输入的时域波形。</para>
/// </param>
/// <param name="samplingRate">
/// <para>sampling rate of the input time-domain signal, in samples per second.</para>
/// <para>Chinese Simplified: 输入信号的采样率，以S/s为单位。</para>
/// </param>
/// <param name="spectrum">
/// <para>output sequence containing the power spectrum.</para>
/// <para>Chinese Simplified: 输出功率谱。</para>
/// </param>
/// <param name="df">
/// <para>the frequency resolution of the spectrum, in hertz.</para>
/// <para>Chinese Simplified: 功率谱的频谱间隔，以Hz为单位。</para>
/// </param>
/// <param name="unitSettings">
/// <para>unit settings of the output power spectrum</para>
/// <para>Chinese Simplified: 设置功率谱的单位。</para>
/// </param>
/// <param name="windowType">
/// <para>the time-domain window to apply to the time signal.</para>
/// <para>Chinese Simplified: 窗类型。</para>
/// </param>
/// <param name="windowPara">
/// <para>parameter for a Kaiser/Gaussian/Dolph-Chebyshev window, If window is any other window, this parameter is ignored</para>
/// <para>Chinese Simplified: 窗调整系数，仅用于Kaiser/Gaussian/Dolph-Chebyshev窗。</para>
/// </param>
public static void PowerSpectrum(double[] x, double samplingRate, ref double[] spectrum, out double df,
UnitConvSetting unitSettings, WindowType windowType, double windowPara)
{
int spectralLines = spectrum.Length; //谱线数是输出数组的大小
SpectralInfo spectralInfo = new SpectralInfo();
AdvanceRealFFT(x, spectralLines, windowType, spectrum, ref spectralInfo);
double scale = 1.0 / spectralInfo.FFTSize;
//CBLASNative.cblas_dscal(spectralLines, scale, spectrum, 1);
for (int i = 0; i < spectrum.Length; i++)
{
spectrum[i] = spectrum[i] * scale;
}
df = 0.5 * samplingRate / spectralInfo.spectralLines; //计算频率间隔
//Unit Conversion
UnitConversion(spectrum, df, SpectrumType.Amplitude, unitSettings, Window.WindowENBWFactor[(int)windowType]);
}
/// <summary>
/// <para>Computes the power spectrum of input time-domain signal.</para>
/// <para>Chinese Simplified: 计算输入信号的功率频谱。</para>
/// </summary>
/// <param name="x">
/// <para>input time-domain signal.</para>
/// <para>Chinese Simplified: 输入的时域波形。</para>
/// </param>
/// <param name="samplingRate">
/// <para>sampling rate of the input time-domain signal, in samples per second.</para>
/// <para>Chinese Simplified: 输入信号的采样率，以S/s为单位。</para>
/// </param>
/// <param name="spectrum">
/// <para>output sequence containing the power spectrum.</para>
/// <para>Chinese Simplified: 输出功率谱。</para>
/// </param>
/// <param name="df">
/// <para>the frequency resolution of the spectrum, in hertz.</para>
/// <para>Chinese Simplified: 功率谱的频谱间隔，以Hz为单位。</para>
/// </param>
/// <param name="unit">
/// <para>unit of the output power spectrum</para>
/// <para>Chinese Simplified: 设置功率谱的单位。</para>
/// </param>
/// <param name="windowType">
/// <para>the time-domain window to apply to the time signal.</para>
/// <para>Chinese Simplified: 窗类型。</para>
/// </param>
/// <param name="windowPara">
/// <para>parameter for a Kaiser/Gaussian/Dolph-Chebyshev window, If window is any other window, this parameter is ignored</para>
/// <para>Chinese Simplified: 窗调整系数，仅用于Kaiser/Gaussian/Dolph-Chebyshev窗。</para>
/// </param>
/// <param name="PSD">
/// <para>specifies whether the output power spectrum is converted to power spectral density.</para>
/// <para>Chinese Simplified: 输出的频谱是否为功率谱密度。</para>
/// </param>
public static void PowerSpectrum(double[] x, double samplingRate, ref double[] spectrum, out double df,
SpectrumUnits unit = SpectrumUnits.V2, WindowType windowType = WindowType.Hann,
double windowPara = double.NaN, bool PSD = false)
{
int spectralLines = spectrum.Length; //谱线数是输出数组的大小
SpectralInfo spectralInfo = new SpectralInfo();
AdvanceRealFFT(x, spectralLines, windowType, spectrum, ref spectralInfo);
double scale = 1.0 / spectralInfo.FFTSize;
//CBLASNative.cblas_dscal(spectralLines, scale, spectrum, 1);
for (int i = 0; i < spectrum.Length; i++)
{
spectrum[i] *= scale;
}
df = 0.5 * samplingRate / spectralInfo.spectralLines; //计算频率间隔
//Unit Conversion
UnitConvSetting unitSettings = new UnitConvSetting(unit, PeakScaling.Rms, 50.00, PSD);
UnitConversion(spectrum, df, SpectrumType.Amplitude, unitSettings, Window.WindowENBWFactor[(int)windowType]);
}
//#region ------------Public: PeakSpectrumAnalysis------------
///// <summary>
///// Get the fundamental frequency and array of harmonic power.
///// </summary>
///// <param name="timewaveform">the waveform of input signal assuming in voltage</param>
///// <param name="dt">sampling interval of timewaveform (s)</param>
///// <param name="peakFreq">the calculated peak tone frequency</param>
///// <param name="peakAmp">the calculated peak tone voltage peak amplitude, which is 1.414*RMS</param>
///// i.e. peakSignal=peakAmp*sin(2*pi*peakFreq*t)
//public static void PeakSpectrumAnalysis(double[] timewaveform, double dt, out double peakFreq, out double peakAmp)
//{
// double[] spectrum = new double[timewaveform.Length / 2];
// double df;
// var spectUnit = SpectrumUnits.V2; //this V^2 unit relates to power in band calculation, don't change
// var winType = WindowType.Hanning; //relates to ENBW, must change in pair
// double ENBW = 1.5000; //ENBW for winType Hanning.ENBW = 1.500
// double approxFreq = -1;
// double searchRange = 0;
// double maxValue = 0;
// int maxValueIndex = 0;
// int i, approxFreqIndex, startIndex, endIndex;
// double powerInBand = 0;
// double powerMltIndex = 0;
// Spectrum.PowerSpectrum(timewaveform, 1 / dt, ref spectrum, out df, spectUnit, winType);
// if (approxFreq < 0)
// {
// startIndex = 0;
// endIndex = spectrum.Length;
// }
// else
// {
// approxFreqIndex = (int)(approxFreq / df);
// endIndex = (int)(searchRange / 200 / dt); // start earch with approx. Freq - 1/2 range
// startIndex = approxFreqIndex - endIndex; //start search index
// endIndex = (int)(searchRange / 100 / dt); //search length in indexes
// if (startIndex < 0) startIndex = 0; //start index protection
// if (startIndex > spectrum.Length - 2) startIndex = spectrum.Length - 2; //start index protection
// if (endIndex < 1) endIndex = 1; //protect search range;
// };
// //Search spectrum from [i1] to i1+i2-1;
// maxValue = -1; //power spectrum can not be less than 0;
// maxValue = spectrum.Max();
// maxValueIndex = Array.FindIndex<double>(spectrum, s => s == maxValue);
// startIndex = maxValueIndex - 3;
// if (startIndex < 0) startIndex = 0;
// endIndex = startIndex + 7;
// if (endIndex > spectrum.Length - 1) endIndex = spectrum.Length - 1;
// for (i = startIndex; i < endIndex; i++)
// {
// powerInBand += spectrum[i];
// powerMltIndex += spectrum[i] * i;
// }
// peakFreq = powerMltIndex / powerInBand * df; //Given the estimated frequency and power, the exact frequency can be calculated
// peakAmp = Math.Sqrt(powerInBand / ENBW * 2); //convert V^2 to V peak amplitude //Refer this formula to ITU Handbook
//}
//#endregion
#region ---------------Private: UnitConversion------------
/// <summary>
/// 频谱单位转换函数
/// </summary>
/// <param name="spectrum">输入频谱，单位转换后返回的序列也保存在里面</param>
/// <param name="spectrumType">输入频谱类型，功率谱或者幅度谱</param>
/// <param name="df">频谱间隔</param>
/// <param name="unitSetting">单位转换设置</param>
/// <param name="equivalentNoiseBw">计算频谱时，加窗所用窗函数的等效噪声带宽</param>
/// <returns></returns>
private static void UnitConversion(double[] spectrum, double df, SpectrumType spectrumType,
UnitConvSetting unitSetting, double equivalentNoiseBw)
{
double scale = 1.0;
int freq0Idx = 0, N = spectrum.Length;
//VMLNative.vdSqr(N, spectrum, spectrum);
if (unitSetting.PeakScaling == PeakScaling.Peak) //峰峰值要乘以2
{
switch (spectrumType)
{
case SpectrumType.Amplitude: // Sqrt2
scale *= Sqrt2;
break;
case SpectrumType.Power: // 2
scale *= 2;
break;
default:
throw new ArgumentOutOfRangeException(nameof(spectrumType), spectrumType, null);
}
//CBLASNative.cblas_dscal(N, scale, spectrum, 1);
//spectrum[0] /= scale; //零频不用
for (int i = 1; i < spectrum.Length; i++)
{
spectrum[i] *= scale;
}
}
//根据设置的转换单位进行转换
switch (unitSetting.Unit)
{
case SpectrumUnits.V:
{
if (SpectrumType.Power == spectrumType)
{
//VMLNative.vdSqrt(N, spectrum, spectrum);
for (int i = 0; i < spectrum.Length; i++)
{
spectrum[i] = Math.Sqrt(spectrum[i]);
}
}
break;
}
case SpectrumUnits.dBV:
{
if (SpectrumType.Power == spectrumType)
{
//VMLNative.vdSqrt(N, spectrum, spectrum);
for (int i = 0; i < spectrum.Length; i++)
{
spectrum[i] = Math.Sqrt(spectrum[i]);
}
}
for (int i = 0; i < spectrum.Length; i++)
{
spectrum[i] = 20 * Math.Log10(spectrum[i]);
}
////lg
//VMLNative.vdLog10(N, spectrum, spectrum);
//scale = 20;
////20*lg
//CBLASNative.cblas_dscal(N, scale, spectrum, 1);
break;
}
case SpectrumUnits.dBmV:
{
if (SpectrumType.Power == spectrumType)
{
//VMLNative.vdSqrt(N, spectrum, spectrum);
for (int i = 0; i < spectrum.Length; i++)
{
spectrum[i] = Math.Sqrt(spectrum[i]);
}
}
for (int i = 0; i < spectrum.Length; i++)
{
spectrum[i] = 20 * Math.Log10(spectrum[i] * 1e3);
}
//CBLASNative.cblas_dscal(N, 1e3, spectrum, 1); //V To mV
//VMLNative.vdLog10(N, spectrum, spectrum); //To Lg
//scale = 20;
//CBLASNative.cblas_dscal(N, scale, spectrum, 1); //To 20*Lg
break;
}
case SpectrumUnits.dBuV:
{
if (SpectrumType.Power == spectrumType)
{
//VMLNative.vdSqrt(N, spectrum, spectrum);
for (int i = 0; i < spectrum.Length; i++)
{
spectrum[i] = Math.Sqrt(spectrum[i]);
}
}
for (int i = 0; i < spectrum.Length; i++)
{
spectrum[i] = 20 * Math.Log10(spectrum[i] * 1e6);
}
//CBLASNative.cblas_dscal(N, 1e6, spectrum, 1); //V To uV
//VMLNative.vdLog10(N, spectrum, spectrum);//To Lg
//scale = 20;
//CBLASNative.cblas_dscal(N, scale, spectrum, 1);//To 20*Lg
break;
}
case SpectrumUnits.V2:
{
if (SpectrumType.Amplitude == spectrumType)
{
//VMLNative.vdSqr(N, spectrum, spectrum);
for (int i = 0; i < spectrum.Length; i++)
{
spectrum[i] *= spectrum[i];
}
}
break;
}
case SpectrumUnits.W:
case SpectrumUnits.dBW:
case SpectrumUnits.dBm:
{
if (SpectrumType.Amplitude == spectrumType)
{
//VMLNative.vdSqr(N, spectrum, spectrum);
for (int i = 0; i < spectrum.Length; i++)
{
spectrum[i] *= spectrum[i];
}
}
for (int i = 0; i < spectrum.Length; i++)
{
spectrum[i] = spectrum[i] * spectrum[i] / unitSetting.Impedance;
}
//scale = 1.0 / unitSetting.Impedance; //1/R
//VMLNative.vdSqr(N, spectrum, spectrum); //V^2
//CBLASNative.cblas_dscal(N, scale, spectrum, 1); //W = V^2/R
if (unitSetting.Unit == SpectrumUnits.dBW) //dBW = 20lgW
{
////lg
//VMLNative.vdLog10(N, spectrum, spectrum);
//scale = 20;
////20*lg
//CBLASNative.cblas_dscal(N, scale, spectrum, 1);
for (int i = 0; i < spectrum.Length; i++)
{
spectrum[i] = 20 * Math.Log10(spectrum[i]);
}
}
else if (unitSetting.Unit == SpectrumUnits.dBm) // dBm = 10lg(W/1mW)
{
//CBLASNative.cblas_dscal(N, 1e3, spectrum, 1); // W/1mW
// //lg
//VMLNative.vdLog10(N, spectrum, spectrum);
//scale = 10;
////10*lg
//CBLASNative.cblas_dscal(N, scale, spectrum, 1);
for (int i = 0; i < spectrum.Length; i++)
{
spectrum[i] = 10 * Math.Log10(spectrum[i] * 1e3);
}
}
break;
}
default:
{
break;
}
}
if (!unitSetting.PSD)
{
return;
}
for (int i = 0; i < spectrum.Length; i++)
{
spectrum[i] = spectrum[i] / (equivalentNoiseBw * df);
}
////谱密度计算
//scale = 1.0 / (equivalentNoiseBw * df);
//CBLASNative.cblas_dscal(N, scale, spectrum, 1);
}
