N = 25;

k        = zeros(1,N);
lambda_r = zeros(1,N);
lambda_c = zeros(1,N);

k(1)        = 300;
lambda_r(1) =  0.03051893166903;
lambda_c(1) = -0.32887555750354;

k(2)        = 310;
lambda_r(2) = 0.00319373625057;
lambda_c(2) = -0.32228373414204;

k(3)        = 350;
lambda_r(3) = -0.16946825476467;
lambda_c(3) = -0.26019842172357;

k(4)        = 400;
lambda_r(4) = -0.55943779280922;
lambda_c(4) = -0.08869650680063;

k(5)        = 450;
lambda_r(5) = -0.69811479991791;
lambda_c(5) = -0.03763337625298;

k(6)        = 500;
lambda_r(6) = -0.77530885078003;
lambda_c(6) = -0.01365102428031;

k(7)        = 550;
lambda_r(7) = -0.82584020472873;
lambda_c(7) = -0.00035595010773;

k(8)        = 575;
lambda_r(8) = -0.84507461106758;
lambda_c(8) = 0.00406453131344;

k(9)        = 600;
lambda_r(9) = -0.86142428053822;
lambda_c(9) =  0.00748430322398;

k(10)       = 650;
lambda_r(10) =  -0.88778871143580;
lambda_c(10) = 0.01221546698130;

k(11)       = 700;
lambda_r(11) = -0.90786363473232;
lambda_c(11) =  0.01502324345741;

k(12)       = 900;
lambda_r(12) = -0.95434489063025;
lambda_c(12) =  0.01739444491782;

k(13)       = 950;
lambda_r(13) = -0.96118621999155;
lambda_c(13) = 0.01696576379239;

k(14)       =1000;
lambda_r(14) = -0.96691295799778;
lambda_c(14) = 0.01635946583072;

k(15)       = 1100;
lambda_r(15) = -0.97577026795135;
lambda_c(15) =  0.01481246733584;

k(16)       = 1200;
lambda_r(16) = -0.98219897187727;
lambda_c(16) = 0.01304648945438;

k(17)       = 1300;
lambda_r(17) = -0.98699126477480;
lambda_c(17) = 0.01121625641512;

k(18)       = 1400;
lambda_r(18) = -0.99056235414720;
lambda_c(18) =  0.00939146594368;

k(19)       = 1500;
lambda_r(19) = -0.99327312616524;
lambda_c(19) =  0.00761931075077;

k(20)       = 1600;
lambda_r(20) = -0.99537295386975;
lambda_c(20) = 0.00592492558324;

k(21)       = 1700;
lambda_r(21) = -0.99700598319426;
lambda_c(21) = 0.00431604746103;

k(22)       = 1800;
lambda_r(22) = -0.99827844757331;
lambda_c(22) = 0.00279454007594;

k(23)       = 1900;
lambda_r(23) = -0.99923262767541;
lambda_c(23) = 0.00135345930859;

k(24)       = 2000;
lambda_r(24) = -0.99997231458155;
lambda_c(24) = -4.099296761727752e-06;

k(25)       = 2500;
lambda_r(25) = -1.00172853420992;
lambda_c(25) = -0.00569882785671;

figure;
subplot(211);
plot(k,lambda_r,'b-',k,lambda_r,'ko');
xlabel('k');
ylabel('lambda_R');
grid on;

subplot(212);
plot(k,lambda_c,'b-',k,lambda_c,'ko');
xlabel('k');
ylabel('Re(lambda_C)');
grid on;