summaryrefslogtreecommitdiff
path: root/2.3-1/demos/Abhinav_Demos/nan_cumsum.sci
blob: c5943a0f2749d09adaf07019af50f962b471fffc (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
26
27
28
29
30
31
32
33
34
35
function nan_cumsum ()
    x= [1 %nan 1 0.8; 21 1 13 %nan]	
	disp('Double')
	a= nancumsum(x)
	disp(a)
	disp('')
	b= nancumsum(x, 'r')
	disp(b)
	disp('')
	c= nancumsum(x,'c')
	disp(c)
	disp('')
    y= float(x)
	disp('Float')
	d= nancumsum(y)
	disp(d)
	disp('')
	e= nancumsum(y, 'r')
	disp(e)
	disp('')
	f= nancumsum(y,'c')
	disp(f)
	disp('')
    z= [%nan , 12, 1219, %nan + %i*121; 121 %nan 90 12]
	disp('DoubleComplex')
	g= nancumsum(z)
	disp(g)
	disp('')
	h= nancumsum(z, 'r')
	disp(h)
	disp('')
	i= nancumsum(z,'c')
	disp(i)
	disp('')
endfunction