login
The OEIS is supported by the many generous donors to the OEIS Foundation.

 

Logo
Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A049478 Record values in A346778. 4
0, 1, 4, 6, 12, 22, 27, 62, 64, 84, 104, 106, 108, 114, 132, 142, 178, 179, 186, 213, 216, 247, 273, 322, 341, 357, 358, 449, 458, 462, 470, 478, 482, 495, 499, 502, 581, 585, 597, 598, 623, 662, 672, 681, 735, 772, 778, 794, 818, 827, 851, 864 (list; graph; refs; listen; history; text; internal format)
OFFSET

1,3

COMMENTS

Record values of the least g >= 1 such that the first g terms of row n of A088643 [start with n and always append the largest k < n not yet used such that n+k is a prime] constitute the set {n, n-1, ..., n-g+1}, and the next (i.e., (g+1)-th) term of that row equals n-g. - M. F. Hasler, Aug 04 2021

LINKS

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

PROG

(PARI) {print1(m=0); for( n=1, oo, my( r=A088643_row(n)); for( g=1, #r-1, if( Set(r[1..g]) == [n-g+1..n] && r[g+1]==n-g, g > m && print1(", "m=g); break)))} \\ M. F. Hasler, Aug 04 2021

CROSSREFS

Cf. A049476, A049477, A088643, A346778.

Sequence in context: A128034 A027150 A020141 * A263458 A163776 A050558

Adjacent sequences:  A049475 A049476 A049477 * A049479 A049480 A049481

KEYWORD

nonn,nice

AUTHOR

N. J. A. Sloane

EXTENSIONS

Revised by Sean A. Irvine, Aug 03 2021

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 January 24 18:41 EST 2022. Contains 350565 sequences. (Running on oeis4.)