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

 

Logo


Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A100353 Inverse of A097104. 2
4, 1, 2, 3, 400, 8, 5, 6, 12, 7, 69, 16, 9, 10, 21, 11, 61, 27, 13, 14, 31, 15, 92, 38, 17, 347, 18, 43, 19, 20, 47, 142, 22, 53, 23, 163, 24, 25, 14006, 26, 65, 720, 28, 29, 3310, 30, 79, 4087, 32, 85, 33, 268, 34, 35, 1103, 36, 97, 37, 324, 103, 39, 40, 110, 41, 1405, 42, 117 (list; graph; refs; listen; history; text; internal format)
OFFSET

1,1

LINKS

Table of n, a(n) for n=1..67.

MATHEMATICA

lst = Table[n, {n, 100}]; f[m_] := (lst = Drop[ Insert[ lst, lst[[m]], Prime[m] + 1], {m, m}]); Do[ f[n], {n, 25}]; Take[lst, 70]; g[n_] := Block[{k = 1}, While[ lst[[k]] != n, k++ ]; k]; Table[ g[n], {n, 70}]

CROSSREFS

Cf. A097104, A100352.

Sequence in context: A084454 A127812 A072033 * A080508 A178141 A063987

Adjacent sequences:  A100350 A100351 A100352 * A100354 A100355 A100356

KEYWORD

nonn

AUTHOR

Leroy Quet and Robert G. Wilson v, Nov 18 2004

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
The OEIS Community | Maintained by The OEIS Foundation Inc.

License Agreements, Terms of Use, Privacy Policy. .

Last modified November 15 13:47 EST 2019. Contains 329149 sequences. (Running on oeis4.)