9 lines
124 B
Text
9 lines
124 B
Text
|
function r = isnum(a)
|
||
|
|
if ( isnumeric(a) )
|
||
|
|
r = 1;
|
||
|
|
else
|
||
|
|
o = str2double(a);
|
||
|
|
r = !isnan(o);
|
||
|
|
endif
|
||
|
|
endfunction
|