|
|
A182561
|
|
Position of first occurrence of n in A182535.
|
|
1
|
|
|
1, 4, 7, 16, 45, 74, 166, 529, 866, 1993, 4560, 9907, 27425, 62894, 161134, 386007, 1308165, 2363223, 7190239, 17844411, 54259731, 90564740, 308061971, 487568736, 1422102892, 3573737940, 8516241133, 22686128280, 77770540116, 144783290133, 365331892456, 928427248701, 2354811032695
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,2
|
|
LINKS
|
|
|
EXAMPLE
|
First occurrence of 4 in A182535 has index 16, so a(4)=16.
|
|
PROG
|
(PARI) { a(n) = my(k, p, t); k=n-1; while(1, k++; p=[]; forvec(v=vector(n-1, i, [1, k-1]), t = fibonacci(n+k) + sum(i=1, n-1, fibonacci(v[i]+i)); if(ispseudoprime(t), p=concat(p, [t])); , 2); if(p, return(primepi(vecmin(p)))); ); } /* Max Alekseyev, Jan 31 2014 */
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
|
|
EXTENSIONS
|
|
|
STATUS
|
approved
|
|
|
|