login
A276729
Number of nonprime digits in the decimal expansion of n.
3
1, 1, 0, 0, 1, 0, 1, 0, 1, 1, 2, 2, 1, 1, 2, 1, 2, 1, 2, 2, 1, 1, 0, 0, 1, 0, 1, 0, 1, 1, 1, 1, 0, 0, 1, 0, 1, 0, 1, 1, 2, 2, 1, 1, 2, 1, 2, 1, 2, 2, 1, 1, 0, 0, 1, 0, 1, 0, 1, 1, 2, 2, 1, 1, 2, 1, 2, 1, 2, 2, 1, 1, 0, 0, 1, 0, 1, 0, 1, 1, 2, 2, 1, 1, 2, 1, 2, 1, 2, 2, 2
OFFSET
0,11
LINKS
FORMULA
a(n) = A055642(n) - A193238(n).
a(A046034(n)) = 0. - Gordon Atkinson, Sep 06 2019
MAPLE
f:= proc(n) local t; option remember;
t:= n mod 10;
procname((n-t)/10) + `if`(member(t, [2, 3, 5, 7]), 0, 1)
end proc:
f(0):= 0:
1, seq(f(i), i=1..100); # Robert Israel, Feb 27 2019
PROG
(PARI) a(n)=#select(t->!isprime(t), digits(n))
CROSSREFS
Cf. A011557 (integers that give records).
Sequence in context: A060709 A035222 A136436 * A257629 A143331 A167677
KEYWORD
nonn,base,easy
AUTHOR
M. F. Hasler, Sep 16 2016
STATUS
approved