countgtone {MQMF}

countgtone used in apply to count the number > 1 in a vector

Description

countgtone used in the base function 'apply', or 'tapply' to count the number > 1 in a vector

Usage

countgtone(invect)

Arguments

invect

vector of values

Value

the number of values in the vector > 1

Examples

x <- matrix(trunc(runif(20)*10),nrow=4,ncol=5)
print(x)
apply(x,1,countgtone)