FilesExpand file tree

 master

/

LAG.m

Copy path

Blame

More file actions

Blame

More file actions

Latest commit

 

History

History

History

15 lines (15 loc) · 203 Bytes

 master

/

LAG.m

Copy path

Top

File metadata and controls

• Code
• Blame

15 lines (15 loc) · 203 Bytes

Raw

Copy raw file

Download raw file

Open symbols panel

Edit and raw actions

1

2

3

4

5

6

7

8

9

10

11

12

13

14

15

function s=lagrange(t,n)

for i=1:n

h=2*pi/n;

x(i)=i*h;

end

s=0;

for i=1:n

l=1;

for j=1:n

if j~=i

l=l*(t-x(j))/(x(i)-x(j));

end

end

s=s+sin(x(i))*l;

end