

% Compute time-series
Nsecs = 1e2; % Number of seconds desired
fs    = 10;

s = ao(plist('tsfcn', 'sin(2*pi*1.137*t)', 'fs', fs, 'Nsecs', Nsecs));
n = ao(plist('tsfcn', 'randn(size(t))', 'fs', fs, 'Nsecs', Nsecs));
b = n + s;

% Zero pad x3
bz = zeropad(b, plist('Factor', 10));

% Zero pad with N samples
cz = zeropad(b, plist('N', 100));

iplot(b,bz,cz)

% Spectra
bxx = abs(fft(b)).^2;
bzxx = abs(fft(bz)).^2;
czxx = abs(fft(cz)).^2;

iplot(bzxx, bxx, czxx)

