Zentral makefile include for chapters of script
This commit is contained in:
32
programmingstyle/code/calculateSines.m
Normal file
32
programmingstyle/code/calculateSines.m
Normal file
@@ -0,0 +1,32 @@
|
||||
function sines = calculateSines(times, amplitudes, frequencies)
|
||||
% Function calculates sinewaves with all combinations of
|
||||
% given amplitudes and frequencies.
|
||||
%
|
||||
% sines = calculateSines(times, amplitudes, frequencies)
|
||||
%
|
||||
% Arguments:
|
||||
% times : vector of times as which the sines should be computed.
|
||||
% amplitudes : vector with amplitudes.
|
||||
% frequencies: vector with frequencies.
|
||||
%
|
||||
% Returns:
|
||||
% a 3-D Matrix of sinewaves, 2nd dimension represents
|
||||
% the amplitudes, 3rd the frequencies.
|
||||
sines = zeros(length(times), length(amplitudes), length(frequencies));
|
||||
for i = 1:length(amplitudes)
|
||||
sines(:,i,:) = sinesWithFrequencies(times, amplitudes(i), frequencies);
|
||||
end
|
||||
end
|
||||
|
||||
|
||||
function sines = sinesWithFrequencies(times, amplitude, frequencies)
|
||||
sines = zeros(length(times), length(frequencies));
|
||||
for i = 1:length(frequencies)
|
||||
sines(:,i) = sineWave(times, amplitude, frequencies(i));
|
||||
end
|
||||
end
|
||||
|
||||
|
||||
function sine = sineWave(times, amplitude, frequency)
|
||||
sine = sin(2.0*pi.*times*frequency) .* amplitude;
|
||||
end
|
||||
@@ -1,30 +0,0 @@
|
||||
function sines = calculate_sines(x, amplitudes, frequencies)
|
||||
% Function calculates sinewaves with all combinations of
|
||||
% given amplitudes and frequencies.
|
||||
% Arguments: x, a vector of radiants for which the sine should be
|
||||
% computed.
|
||||
% amplitudes, a vector of amplitudes.
|
||||
% frequencies, a vector of frequencies.
|
||||
%
|
||||
% Returns: a 3-D Matrix of sinewaves, 2nd dimension represents
|
||||
% the amplitudes, 3rd the frequencies.
|
||||
|
||||
sines = zeros(length(x), length(amplitudes), length(frequencies));
|
||||
|
||||
for i = 1:length(amplitudes)
|
||||
sines(:,i,:) = sines_with_frequencies(x, amplitudes(i), frequencies);
|
||||
end
|
||||
end
|
||||
|
||||
|
||||
function sines = sines_with_frequencies(x, amplitude, frequencies)
|
||||
sines = zeros(length(x), length(frequencies));
|
||||
for i = 1:length(frequencies)
|
||||
sines(:,i) = sinewave(x, amplitude, frequencies(i));
|
||||
end
|
||||
end
|
||||
|
||||
|
||||
function sine = sinewave(x, amplitude, frequency)
|
||||
sine = sin(2 .* pi .* x *frequency) .* amplitude;
|
||||
end
|
||||
Reference in New Issue
Block a user