Prob19

# Prob19 - N=300; % number of points in the graph

This preview shows page 1. Sign up to view the full content.

% Problem 1.9b clear all; % clear all variables close all; % close all opened graphs figure; % open new graph sigma_Cu=64.516e6; % define material conductivity mu=4*pi*1e-7; % define permeability of free space epsilon=8.85e-12; % define permittivity of free space % define constants for this example a=2.019e-4; % radius of wire r=2.5e-3; % radius of coil l=5e-3; % length of coil NN=10; % number of turns % compute parameters of the equivalent circuit L=pi*r^2*mu*NN^2/l; % inductance of the computed coil % using the formula for a solenoid C=4*pi*epsilon*r*a*NN^2/l; % capacitance between turns R=2*pi*r*NN/(sigma_Cu*pi*a^2); % resistance of the wire WITHOUT SKIN EFFECT % define frequency range f_min=100e6; % lower frequency limit f_max=100e9; % upper frequency limit
This is the end of the preview. Sign up to access the rest of the document.

Unformatted text preview: N=300; % number of points in the graph f=f_min*((f_max/f_min).^((0:N)/N)); % compute frequency points on log scale w=2*pi*f; % Including Skin Effect delta=1./sqrt(pi*f*mu*sigma_Cu); R_skin=(a*R)./(2.*delta); Z=1./(j*w*C+1./(R+j*w*L)); % impedance of the coil without skin effect Z_skin=1./(j*w*C+1./(R_skin+j*w*L));% inductor impedance including skin effect loglog(f,abs(Z_skin)); hold on %loglog(f,abs(Z)); %loglog(f,abs(Z_skin)); title('Impedance of a capacitor as function of frequency'); xlabel('Frequency {\itf}, Hz'); ylabel('Impedance |Z|, {\Omega}'); legend('without skin effect', 'including skin effect'); % print -deps 'fig1_17.eps' % if uncommented -> saves a copy of plot in EPS format...
View Full Document

## This note was uploaded on 02/06/2012 for the course EE 2120 taught by Professor Aravena during the Fall '08 term at LSU.

Ask a homework question - tutors are online