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!)
A226271 Index of 1/n in the Fibonacci (or rabbit) ordering of the positive rationals. 3
1, 4, 6, 9, 14, 22, 35, 56, 90, 145, 234, 378, 611, 988, 1598, 2585, 4182, 6766, 10947, 17712, 28658, 46369, 75026, 121394, 196419, 317812, 514230, 832041, 1346270, 2178310, 3524579, 5702888, 9227466, 14930353, 24157818, 39088170, 63245987, 102334156, 165580142 (list; graph; refs; listen; history; text; internal format)
OFFSET
1,2
COMMENTS
The Fibonacci ordering of the rationals (cf. A226080) is the sequence of rationals produced from the initial vector [1] by appending iteratively the new rationals obtained by applying the map t-> (t+1, 1/t) to the vector (cf. example).
Apart from initial terms, the same as A001611=(1, 2, 2, 3, 4, 6,...), A020706=(4,6,9,...), A048577=(3, 4, 6, ...), A000381=(2, 3, 4, ...).
LINKS
FORMULA
a(n) = 2*a(n-1)-a(n-3) for n>4. G.f.: -x*(2*x^3+2*x^2-2*x-1) / ((x-1)*(x^2+x-1)). - Colin Barker, Jun 03 2013
a(n) = 1+(2^(-1-n)*((1-sqrt(5))^n*(-3+sqrt(5))+(1+sqrt(5))^n*(3+sqrt(5))))/sqrt(5) for n>1. - Colin Barker, May 11 2016
E.g.f.: -2*(1 + x) + exp(x) + (3*sqrt(5)*sinh(sqrt(5)*x/2) + 5*cosh(sqrt(5)*x/2))*exp(x/2)/5. - Ilya Gutkovskiy, May 11 2016
EXAMPLE
Starting from the vector [1] and applying the map t->(1+t,1/t), we get [2,1] (but ignore the number 1 which already occurred earlier), then [3,1/2], then [4,1/3,3/2,2] (where we ignore 2), etc. This yields the sequence (1,2,3,1/2,4,1/3,3/2,5,1/4,4/3,5/2,2/3,....) The unit fractions 1=1/1, 1/2, 1/3, ... occur at positions 1,4,6,9,...
MATHEMATICA
LinearRecurrence[{2, 0, -1}, {1, 4, 6, 9}, 40] (* Harvey P. Dale, Feb 04 2016 *)
PROG
(PARI) A226271(n)=if(n>1, fibonacci(n+2))+1
(PARI) {k=1; print1(s=1, ", "); U=Set(g=[1]); for(n=1, 9, U=setunion(U, Set(g=select(f->!setsearch(U, f), concat(apply(t->[t+1, k/t], g))))); for(i=1, #g, numerator(g[i])==1&&print1(s+i", ")); s+=#g)} \\ for illustrative purpose
(PARI) Vec(-x*(2*x^3+2*x^2-2*x-1)/((x-1)*(x^2+x-1)) + O(x^50)) \\ Colin Barker, May 11 2016
CROSSREFS
Sequence in context: A364489 A118692 A020706 * A137371 A179463 A086697
KEYWORD
nonn,easy
AUTHOR
M. F. Hasler, Jun 01 2013
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 April 24 15:57 EDT 2024. Contains 371961 sequences. (Running on oeis4.)