www.gusucode.com > nnet 工具箱 matlab 源码程序 > nnet/@network/private/isposint.m
function f=isposint(v) %ISPOSINT True for positive integer values. % Mark Beale, 11-31-97 % Copyright 1992-2002 The MathWorks, Inc. f = 1; if ~isa(v,'double') | any(size(v) ~= [1 1]) | ... ~isreal(v) | v<0 | round(v) ~= v f = 0; end