OFFSET
1,1
LINKS
James Currie, Narad Rampersad, Dejean's conjecture holds for n >= 30, arXiv:0806.0044 [math.NT], May 30 2008.
FORMULA
a(n) = A007091(n) under the morphism f(1) = 121, f(2) = 123, f(3) = 141, f(4) = 142, or 0 if n base 5 is not a word in the alphabet {1,2,3,4}* i.e., has a zero.
MATHEMATICA
a[n_] := Block[{d = IntegerDigits[n, 5]}, If[Min[d] == 0, 0, FromDigits[ Flatten[d /. {1 -> {1, 2, 1}, 2 -> {1, 2, 3}, 3 -> {1, 4, 1}, 4 -> {1, 4, 2}}]]]]; Array[a, 38] (* Giovanni Resta, Jun 20 2016 *)
CROSSREFS
KEYWORD
base,easy,nonn
AUTHOR
Jonathan Vos Post, Jun 03 2008
EXTENSIONS
Data corrected by Giovanni Resta, Jun 20 2016
STATUS
approved