Equidigital {Zseq}

Equidigital numbers

Description

Under OEIS A046758, an Equidigital number has equal digits as the number of digits in its prime factorization including exponents. First 6 Equidigital numbers are 1, 2, 3, 5, 7, 10. Though it doesn't matter which base we use, here we adopt only a base of 10.

Usage

Equidigital(n, gmp = TRUE)

Arguments

n

the number of first n entries from the sequence.

gmp

a logical; TRUE to use large number representation, FALSE otherwise.

Value

a vector of length n containing first entries from the sequence.

See Also

Frugal, Extravagant

Examples

## generate first 20 Equidigital numbers
print(Equidigital(20))