The OEIS mourns the passing of Jim Simons and is grateful to the Simons Foundation for its support of research in many branches of science, including the OEIS.
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!)
A352511 Starts of runs of 4 consecutive Catalan-Niven numbers (A352508). 8
144, 15630, 164862, 202761, 373788, 450189, 753183, 1403961, 1779105, 2588415, 2673774, 2814229, 2850880, 3009174, 3013722, 3045870, 3091023, 3702390, 3942519, 4042950, 4432128, 4725432, 4938348, 5718942, 5907312, 6268248, 6519615, 6592752, 6791379, 7095492, 8567802 (list; graph; refs; listen; history; text; internal format)
OFFSET
1,1
COMMENTS
Conjecture: There are no runs of 5 consecutive Catalan-Niven numbers (checked up to 10^9).
LINKS
EXAMPLE
144 is a term since 144, 145, 146 and 147 are all divisible by the sum of the digits in their Catalan representation:
k A014418(k) A014420(k) k/A014420(k)
--- ---------- ---------- ------------
144 100210 4 36
145 100211 5 29
146 101000 2 73
147 101001 3 49
MATHEMATICA
c[n_] := c[n] = CatalanNumber[n]; catNivQ[n_] := Module[{s = {}, m = n, i}, While[m > 0, i = 1; While[c[i] <= m, i++]; i--; m -= c[i]; AppendTo[s, i]]; Divisible[n, Plus @@ IntegerDigits[Total[4^(s - 1)], 4]]]; seq[count_, nConsec_] := Module[{cn = catNivQ /@ Range[nConsec], s = {}, c = 0, k = nConsec + 1}, While[c < count, If[And @@ cn, c++; AppendTo[s, k - nConsec]]; cn = Join[Rest[cn], {catNivQ[k]}]; k++]; s]; seq[5, 4]
CROSSREFS
Subsequence of A352508, A352509 and A352510.
Sequence in context: A252779 A238284 A249181 * A260861 A079658 A280024
KEYWORD
nonn,base
AUTHOR
Amiram Eldar, Mar 19 2022
STATUS
approved

Lookup | Welcome | Wiki | Register | Music | Plot 2 | Demos | Index | Browse | More | WebCam
Contribute new seq. or comment | Format | Style Sheet | Transforms | Superseeker | Recents
The OEIS Community | Maintained by The OEIS Foundation Inc.

License Agreements, Terms of Use, Privacy Policy. .

Last modified June 3 09:48 EDT 2024. Contains 373057 sequences. (Running on oeis4.)