login
A105390
Number of Hannah Rollman's numbers <= n.
6
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 2, 2, 2, 2, 2, 2, 2, 2, 3, 3, 3, 4, 4, 4, 4, 4, 4, 4, 5, 6, 6, 6, 7, 7, 7, 7, 7, 7, 8, 9, 10, 10, 10, 11, 11, 11, 11, 11, 12, 13, 14, 15, 15, 15, 16, 16, 16, 16, 17, 18, 19, 20, 21, 21, 21, 22, 22, 22, 23, 24, 25, 26, 27, 28, 28
OFFSET
1,23
COMMENTS
a(n) = #{k: A048992(k)<=n} = n - #{k: A048991(k)<=n};
a(n) < n/2 for n < 740; a(n) > n/2 for 740 < n < 1260,
see A105391 for numbers m with a(m) = m/2.
PROG
(JBASIC, from Klaus Brockhaus, Aug 15 2007)
s$ = "" : d = 0
FOR n = 1 TO 100
sn$ = str$(n)
IF instr(s$, sn$) > 0 THEN d = d+1 ELSE s$ = s$ + sn$
print d ; ", ";
NEXT
CROSSREFS
KEYWORD
nonn,base
AUTHOR
Reinhard Zumkeller, Apr 04 2005
STATUS
approved