# Vector of integers
x <- 1:10
is.numint(x) # FALSE
# Vector of numeric integers
x <- as.numeric(x)
is.numint(x) # TRUE
# Vector of numeric values
x <- c(1.1, 1, 1, 1, 2) # FALSE
is.numint(x)
# Single numeric integer
is.numint(1) # TRUE
# Single numeric value
is.numint(1.1) # FALSERun the code above in your browser using DataLab