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!)
A328210 Starts of runs of 3 consecutive Zeckendorf-Niven numbers (A328208). 11
1, 2, 3, 4, 12, 92, 236, 380, 1850, 2630, 4184, 7010, 8183, 8360, 11944, 12754, 13550, 16024, 17710, 17714, 18710, 20628, 22323, 22624, 25564, 28910, 31506, 36463, 36484, 39746, 40368, 44694, 48244, 49294, 53543, 58910, 59164, 64743, 70398, 75024, 77874, 78184 (list; graph; refs; listen; history; text; internal format)
OFFSET

1,2

LINKS

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

Helen G. Grundman, Consecutive Zeckendorf-Niven and lazy-Fibonacci-Niven numbers, Fibonacci Quarterly, Vol. 45, No. 3 (2007), pp. 272-276.

EXAMPLE

12 is in the sequence since 12, 13 and 14 are in A328208: A007895(12) = 3 is a divisor of 12, A007895(13) = 1 is a divisor of 13, and A007895(14) = 2 is a divisor of 14.

MATHEMATICA

z[n_] := Length[DeleteCases[NestWhileList[# - Fibonacci[Floor[Log[Sqrt[5]*# + 3/2]/Log[GoldenRatio]]] &, n, # > 1 &], 0]]; aQ[n_] := Divisible[n, z[n]]; c = 0; k = 1; s = {}; v = Table[-1, {3}]; While[c < 50, If[aQ[k], v = Join[Rest[v], {k}]; If[AllTrue[Differences[v], # == 1 &], c++; AppendTo[s, k - 2]]]; k++]; s (* after Alonso del Arte at A007895 *)

CROSSREFS

Cf. A005349, A007895, A154701, A328208.

Sequence in context: A276530 A251411 A117342 * A303385 A325709 A338478

Adjacent sequences:  A328207 A328208 A328209 * A328211 A328212 A328213

KEYWORD

nonn

AUTHOR

Amiram Eldar, Oct 07 2019

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 September 17 18:28 EDT 2021. Contains 347489 sequences. (Running on oeis4.)