R/nnz.R

Defines functions nnz

Documented in nnz

nnz <-
function(h)
  {
    ###   return number of nonb-zero elements in a vector
    ###  duplicates a matlab function
    return(length(which(h>0)))
  }

Try the PEIP package in your browser

Any scripts or data that you put into this service are public.

PEIP documentation built on Jan. 20, 2018, 9:03 a.m.