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 144898

Submitted on 5 Oct 2012 by James

Correct

102Size
Leading solution size is 35.
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
 
%%
x = 1;
[c,s] = infinite_series(x);
c_correct = -0.3800580037051224; s_correct =  0.3845865774434312;
assert(abs(c-c_correct)<50*eps & abs(s-s_correct)<50*eps)

                    
2
Pass
 
%%
x = exp(1);
[c,s] = infinite_series(x);
c_correct =  0.2832904461013926; s_correct = -0.2693088098978689;
assert(abs(c-c_correct)<50*eps & abs(s-s_correct)<50*eps)

                    
3
Pass
 
%%
x = sqrt(3);
[c,s] = infinite_series(x);
c_correct = -0.3675627321761342; s_correct = -0.2464611942058812;
assert(abs(c-c_correct)<50*eps & abs(s-s_correct)<50*eps)

                    
4
Pass
 
%%
x = 0.001;
[c,s] = infinite_series(x);
c_correct =  0.9984257500575904; s_correct =  0.0079069688545917;
assert(abs(c-c_correct)<50*eps & abs(s-s_correct)<50*eps)

                    
5
Pass
 
%%
x = pi/4;
[c,s] = infinite_series(x);
c_correct = -0.2042534159513846; s_correct =  0.5511304391316155;
assert(abs(c-c_correct)<50*eps & abs(s-s_correct)<50*eps)

                    
6
Pass
 
%%
x = 0.0263;
[c,s] = infinite_series(x);
c_correct =  0.9574346130196565; s_correct =  0.1214323234202421;
assert(abs(c-c_correct)<50*eps & abs(s-s_correct)<50*eps)

                    
7
Pass
 
%%
x = 6.273;
[c,s] = infinite_series(x);
c_correct =  0.9837633160098646; s_correct = -0.0568212139709541;
assert(abs(c-c_correct)<50*eps & abs(s-s_correct)<50*eps)

                    
8
Pass
 
%%
x = 31/7;
[c,s] = infinite_series(x);
c_correct = -0.2961416175321223; s_correct =  0.3148962998550185;
assert(abs(c-c_correct)<50*eps & abs(s-s_correct)<50*eps)