

A104883


a(n) = smallest number k such that A082467(k) = n.


2



4, 5, 8, 7, 24, 11, 54, 51, 22, 117, 222, 19, 114, 87, 46, 207, 216, 61, 258, 291, 128, 591, 336, 43, 306, 423, 136, 519, 492, 97, 888, 951, 146, 537, 318, 163, 1656, 561, 238, 699, 732, 191, 864, 1365, 286, 1353, 1674, 229, 1422, 1671, 802, 2451, 876, 283, 576, 2577
(list;
graph;
refs;
listen;
history;
text;
internal format)



OFFSET

1,1


COMMENTS

This is simply the smallest inverse to A082467. Note that A082467 has offset 4.  N. J. A. Sloane, Jan 15 2020


LINKS

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


MATHEMATICA

f[n_] := Block[{k}, If[ OddQ[n], k = 2, k = 1]; While[ !PrimeQ[n  k]  !PrimeQ[n + k], k += 2]; k]; t = Table[ f[n], {n, 4, 2600}]; u = Table[0, {60}]; Do[a = t[[n]]; If[a < 61 && u[[a]] == 0, u[[a]] = n + 3], {n, 2597}]; u


CROSSREFS

Cf. A082467. Records are in A104884.
Sequence in context: A021222 A132023 A107758 * A154885 A292192 A295150
Adjacent sequences: A104880 A104881 A104882 * A104884 A104885 A104886


KEYWORD

nonn,changed


AUTHOR

Benoit Cloitre and Robert G. Wilson v, Mar 28 2005


EXTENSIONS

Definition corrected by Giovanni Resta.  N. J. A. Sloane, Jan 15 2020


STATUS

approved



