%% Convert Phon to Sone
% Plot the relationship between loudness level (phon) and loudness (sone), as specified in ISO 532-1.

p = 0:120;

s1 = phon2sone(p);

semilogy(p,s1)
xlabel('Loudness Level (phon)')
ylabel('Loudness (sone)')
title('Relation Between Phon and Sone (ISO 532-1)')
grid on
axis([0 120 0 500])

%
% Plot the relationship between loudness level (phon) and loudness (sone), as specified in ISO 532-2.

s2 = phon2sone(p,'ISO 532-2');

semilogy(p,s2)
xlabel('Loudness Level (phon)')
ylabel('Loudness (sone)')
title('Relation Between Phon and Sone (ISO 532-2)')
grid on
axis([0 120 0 500])

% Copyright 2019 The MathWorks, Inc.