login
The OEIS Foundation is supported by donations from users of the OEIS and by a grant from the Simons Foundation.

 

Logo


Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A285526 Terms of A285524 that mark the beginning of four consecutive equal values. 2
4, 12, 20, 27, 35, 43, 51, 59, 67, 74, 82, 90, 98, 106, 113, 121, 129, 137, 145, 153, 160, 168, 176, 184, 192, 200, 207, 215, 223, 231, 239, 246, 254, 262, 270, 278, 286, 293, 301, 309, 317 (list; graph; refs; listen; history; text; internal format)
OFFSET

1,1

LINKS

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

PROG

(PARI) half(n) = if (n % 2, n\2, n/2 - 1);

a285524(n) = {v = vector(half(n), d, d!*(d + 1)!*(2^(n-2*d-1)*stirling(n-d, d+1, 2))); w = vecsort(v, , 1); w[#w]; }

lista(nn) = {v = vector(nn, n, a285524(n+3)); for (k=1, #v-4, if ((v[k] == v[k+1]) && (v[k] == v[k+2]) && (v[k] == v[k+3]), print1(v[k], ", ")); ); }

CROSSREFS

Cf. A285524, A285525.

Sequence in context: A273215 A273277 A100717 * A321466 A227226 A242118

Adjacent sequences:  A285523 A285524 A285525 * A285527 A285528 A285529

KEYWORD

nonn,more

AUTHOR

Michel Marcus, Apr 20 2017

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 July 8 18:55 EDT 2020. Contains 335524 sequences. (Running on oeis4.)