summaryrefslogtreecommitdiff
path: root/413/CH4/EX4.1/Table_4_1.sce
blob: 7095467061af757d78b7ec2060a6808fac799e81 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
clc
clear

function a=eco4(x)
    a=1.000043+x+x.*x.*0.499219+x.*x.*x/6+x.*x.*x.*x.*0.043750
endfunction
function a=eco5(x)
    a=1.000043+x+x.*x.*0.499219+x.*x.*x/6+x.*x.*x.*x.*0.043750+x.*x.*x.*x.*x/120
endfunction
function a=mac4(x)
    a=1+x+x.*x/2+x.*x.*x/6+x.*x.*x.*x/24
endfunction
function a=mac5(x)
    a=1+x+x.*x/2+x.*x.*x/6+x.*x.*x.*x/24+x.*x.*x.*x.*x/120
endfunction
function a=mac6(x)
    a=1+x+x.*x/2+x.*x.*x/6+x.*x.*x.*x/24+x.*x.*x.*x.*x/120+x.*x.*x.*x.*x.*x/720
endfunction
function out=tab4(y)   
out=[y,exp(y),mac6(y),mac5(y),mac4(y),eco5(y),eco4(y)]

endfunction
for y=0:0.2:1
disp(tab4(y))
end