login
This site is supported by donations to The OEIS Foundation.

 

Logo


Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
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 (list; graph; refs; listen; history; text; internal format)
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.

LINKS

Klaus Brockhaus, Table of n, a(n) for n = 1..6000

Klaus Brockhaus, Plots of A105390(n)/n at various scales

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

Cf. A048991, A048992, A105391, A131981.

Sequence in context: A279041 A072746 A179528 * A013941 A061798 A029241

Adjacent sequences:  A105387 A105388 A105389 * A105391 A105392 A105393

KEYWORD

nonn,base

AUTHOR

Reinhard Zumkeller, Apr 04 2005

STATUS

approved

Lookup | Welcome | Wiki | Register | Music | Plot 2 | Demos | Index | Browse | More | WebCam
Contribute new seq. or comment | Format | Style Sheet | Transforms | Superseeker | Recent | More pages
The OEIS Community | Maintained by The OEIS Foundation Inc.

License Agreements, Terms of Use, Privacy Policy .

Last modified March 23 21:31 EDT 2017. Contains 283985 sequences.