function [n]=speakerplot(f,refx,refy,numofrings);
%speakerplot.m ritar upp ringar av en given frekvens vid en given punkt i rummet där antalet anges, f=frekvens [Hz], refx=positionen av ljudkällan i x-led [cm], refy=positionen av ljudkällan i y-led [cm] samt numofrings=antalet ringar runt ljudkällan [1]

c=340;		%ljudhastigheten [m/s]

lambda=c/f*100;	%våglängden [cm]

for n=1:numofrings
x=(-n*lambda/2):0.5:(n*lambda/2);
y=abs(((1-x.^2./(n*lambda/2)^2).*(n*lambda/2)^2).^(1/2));
y1=-y;
plot((refx+x),(y+refy),'k'); hold on;
plot((refx+x),(y1+refy),'k'); hold on;

end
