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

 

Logo

Annual appeal: Please make a donation to keep the OEIS running! Over 6000 articles have referenced us, often saying "we discovered this result with the help of the OEIS".
Other ways to donate

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 November 19 07:16 EST 2017. Contains 294916 sequences.