Discover MakerZone

MATLAB and Simulink resources for Arduino, LEGO, and Raspberry Pi

Learn more

Discover what MATLAB® can do for your career.

Opportunities for recent engineering grads.

Apply Today

Solution 236846

Submitted on 27 Apr 2013 by Khaled Hamed

Correct

32Size
Leading solution size is 26.
This solution is locked. To view this solution, you need to provide a solution of the same size or smaller.

Test Suite

Test
Code Input and Output
1
Pass
 
%%
user_solution = fileread('laguerrePoly.m');
assert(isempty(strfind(user_solution,'regexp')));
assert(isempty(strfind(user_solution,'2str')));
assert(isempty(strfind(user_solution,'str2')));
assert(isempty(strfind(user_solution,'interp')));
assert(isempty(strfind(user_solution,'printf')));
assert(isempty(strfind(user_solution,'assert')));

                    
2
Pass
 
%%
n = 0;
P_correct = [1]/1;
assert(isequal(round(laguerrePoly(n)*1),round(P_correct*1)));

                    
3
Pass
 
%%
n = 1;
P_correct = [-1 1]/1;
assert(isequal(round(laguerrePoly(n)*1),round(P_correct*1)));
ans =
    -1     1
4
Pass
 
%%
n = 2;
P_correct = [1 -4 2]/2;
assert(isequal(round(laguerrePoly(n)*2),round(P_correct*2)));
ans =
    -2     1
ans =
    0.5000   -2.0000    1.0000
5
Pass
 
%%
n = 3;
P_correct = [-1 9 -18 6]/6;
assert(isequal(round(laguerrePoly(n)*6),round(P_correct*6)));
ans =
    -3     1
ans =
    1.5000   -3.0000    1.0000
ans =
   -0.1667    1.5000   -3.0000    1.0000
6
Pass
 
%%
n = 4;
P_correct = [1 -16 72 -96 24]/24;
assert(isequal(round(laguerrePoly(n)*24),round(P_correct*24)));
ans =
    -4     1
ans =
     3    -4     1
ans =
   -0.6667    3.0000   -4.0000    1.0000
ans =
    0.0417   -0.6667    3.0000   -4.0000    1.0000
7
Pass
 
%%
n = 5;
P_correct = [-1 25 -200 600 -600 120]/120;
assert(isequal(round(laguerrePoly(n)*120),round(P_correct*120)));
ans =
    -5     1
ans =
     5    -5     1
ans =
   -1.6667    5.0000   -5.0000    1.0000
ans =
    0.2083   -1.6667    5.0000   -5.0000    1.0000
ans =
   -0.0083    0.2083   -1.6667    5.0000   -5.0000    1.0000
8
Pass
 
%%
n = 6;
P_correct = [1 -36 450 -2400 5400 -4320 720]/720;
assert(isequal(round(laguerrePoly(n)*720),round(P_correct*720)));
ans =
    -6     1
ans =
    7.5000   -6.0000    1.0000
ans =
   -3.3333    7.5000   -6.0000    1.0000
ans =
    0.6250   -3.3333    7.5000   -6.0000    1.0000
ans =
   -0.0500    0.6250   -3.3333    7.5000   -6.0000    1.0000
ans =
    0.0014   -0.0500    0.6250   -3.3333    7.5000   -6.0000    1.0000
9
Pass
 
%%
n = 7;
P_correct = [-1 49 -882 7350 -29400 52920 -35280 5040]/5040;
assert(isequal(round(laguerrePoly(n)*5040),round(P_correct*5040)));
ans =
    -7     1
ans =
   10.5000   -7.0000    1.0000
ans =
   -5.8333   10.5000   -7.0000    1.0000
ans =
    1.4583   -5.8333   10.5000   -7.0000    1.0000
ans =
   -0.1750    1.4583   -5.8333   10.5000   -7.0000    1.0000
ans =
    0.0097   -0.1750    1.4583   -5.8333   10.5000   -7.0000    1.0000
ans =
   -0.0002    0.0097   -0.1750    1.4583   -5.8333   10.5000   -7.0000    1.0000
10
Pass
 
%%
n = 8;
P_correct = [1 -64 1568 -18816 117600 -376320 564480 -322560 40320]/40320;
assert(isequal(round(laguerrePoly(n)*40320),round(P_correct*40320)));
ans =
    -8     1
ans =
    14    -8     1
ans =
   -9.3333   14.0000   -8.0000    1.0000
ans =
    2.9167   -9.3333   14.0000   -8.0000    1.0000
ans =
   -0.4667    2.9167   -9.3333   14.0000   -8.0000    1.0000
ans =
    0.0389   -0.4667    2.9167   -9.3333   14.0000   -8.0000    1.0000
ans =
   -0.0016    0.0389   -0.4667    2.9167   -9.3333   14.0000   -8.0000    1.0000
ans =
    0.0000   -0.0016    0.0389   -0.4667    2.9167   -9.3333   14.0000   -8.0000    1.0000
11
Pass
 
%%
n = 9;
P_correct = [-1 81 -2592 42336 -381024 1905120 -5080320 6531840 -3265920 362880]/362880;
assert(isequal(round(laguerrePoly(n)*362880),round(P_correct*362880)));
ans =
    -9     1
ans =
    18    -9     1
ans =
   -14    18    -9     1
ans =
    5.2500  -14.0000   18.0000   -9.0000    1.0000
ans =
   -1.0500    5.2500  -14.0000   18.0000   -9.0000    1.0000
ans =
    0.1167   -1.0500    5.2500  -14.0000   18.0000   -9.0000    1.0000
ans =
   -0.0071    0.1167   -1.0500    5.2500  -14.0000   18.0000   -9.0000    1.0000
ans =
    0.0002   -0.0071    0.1167   -1.0500    5.2500  -14.0000   18.0000   -9.0000    1.0000
ans =
   -0.0000    0.0002   -0.0071    0.1167   -1.0500    5.2500  -14.0000   18.0000   -9.0000    1.0000
12
Pass
 
%%
n = 10;
P_correct = [1 -100 4050 -86400 1058400 -7620480 31752000 -72576000 81648000 -36288000 3628800]/3628800;
assert(isequal(round(laguerrePoly(n)*3628800),round(P_correct*3628800)));
ans =
   -10     1
ans =
   22.5000  -10.0000    1.0000
ans =
  -20.0000   22.5000  -10.0000    1.0000
ans =
    8.7500  -20.0000   22.5000  -10.0000    1.0000
ans =
   -2.1000    8.7500  -20.0000   22.5000  -10.0000    1.0000
ans =
    0.2917   -2.1000    8.7500  -20.0000   22.5000  -10.0000    1.0000
ans =
   -0.0238    0.2917   -2.1000    8.7500  -20.0000   22.5000  -10.0000    1.0000
ans =
    0.0011   -0.0238    0.2917   -2.1000    8.7500  -20.0000   22.5000  -10.0000    1.0000
ans =
   -0.0000    0.0011   -0.0238    0.2917   -2.1000    8.7500  -20.0000   22.5000  -10.0000    1.0000
ans =
  Columns 1 through 10
    0.0000   -0.0000    0.0011   -0.0238    0.2917   -2.1000    8.7500  -20.0000   22.5000  -10.0000
  Column 11
    1.0000