A262148 Denominators of domain values whose images via the flowsnake Q-function follow a spiral trajectory.

56, 56, 392, 392, 56, 392, 2744, 2744, 19208, 19208, 2744, 19208, 134456, 134456, 941192, 941192, 134456, 941192, 6588344, 6588344, 46118408, 46118408, 6588344, 46118408, 322828856, 322828856, 2259801992, 2259801992, 322828856, 2259801992

Offset

1,1

Comments

See A262147 for extended definition.

Links

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

B. Klee, A Pit of Flowsnakes, Complex Systems, 24, 4 (2015).

B. Klee, Flowsnake Q-Function, Wolfram Demonstrations(2015).

Formula

Conjectures from Colin Barker, Jan 24 2016: (Start)

a(n) = 49*a(n-6) for n>6.

G.f.: 56*(1+x+7*x^2+7*x^3+x^4+7*x^5) / ((1-7*x^3)*(1+7*x^3)).

(End)

Mathematica

b[n_] := Select[Union@Join[Flatten[MapIndexed[#1/(8 7^#2[[1]]) &, MapIndexed[With[{l =If[OddQ[#2[[1]] ], {10, 14, 8, 8, 10}, {10, 8, 8, 14, 10}]}, FoldList[Plus, #1, l]] &, FoldList[7 (#1 + #2) + 24 &, 3, Table[If[OddQ[i], 10, 26], {i, 1, 2 Ceiling[n/6]}]] ] ] ] ], # < 3/8 &][[1 ;; n]]; Denominator[b[100]]

Crossrefs

Numerator sequence: A262147.

Sequence in context: A359604 A292092 A003904 * A008942 A133898 A244357

Adjacent sequences: A262145 A262146 A262147 * A262149 A262150 A262151

Keyword

frac,nonn

Author

Bradley Klee, Sep 12 2015

Status

approved