login
This site is supported by donations to The OEIS Foundation.

 

Logo


Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A119249 Indices of Fibonacci numbers in A081952. 1
4, 7, 10, 17, 22, 31, 41, 47, 49, 71, 71, 98, 119, 161, 169, 191, 191, 239, 239, 239, 338, 338, 338, 431, 431, 449 (list; graph; refs; listen; history; text; internal format)
OFFSET

1,1

LINKS

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

FORMULA

A081952(n) = F(a(n)), where F(k) is the k-th Fibonacci number.

a(n) = the smallest k>3 such that A086435(A000045(k)-1)>=n. [From Max Alekseyev, Apr 23 2010]

EXAMPLE

A081952(4) = 1597 and 1597 is the 17th Fibonacci number, so a(4) = 17.

MATHEMATICA

f[n_, m_, 0] := n == 1; f[n_, m_, d_] := (b = False; l = Select[Divisors[n], #>=m&]; For[i = 1, i <= Length[l], i++, k = l[[i]]; If[f[n / k, k + 1, d - 1], b = True; Break[]]]; b); Do[x = 3; While[ !f[Fibonacci[x] - 1, 2, y], x++ ]; Print[x], {y, 1, 50}]

CROSSREFS

Cf. A081952.

Sequence in context: A310715 A310716 A310717 * A071415 A310718 A310719

Adjacent sequences:  A119246 A119247 A119248 * A119250 A119251 A119252

KEYWORD

hard,more,nonn

AUTHOR

Ryan Propper, Jul 22 2006

EXTENSIONS

a(24)-a(26) from Max Alekseyev, Apr 23 2010

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 May 19 02:45 EDT 2019. Contains 323377 sequences. (Running on oeis4.)