This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.
%I A182561 #18 Jan 31 2014 09:47:12 %S A182561 1,4,7,16,45,74,166,529,866,1993,4560,9907,27425,62894,161134,386007, %T A182561 1308165,2363223,7190239,17844411,54259731,90564740,308061971, %U A182561 487568736,1422102892,3573737940,8516241133,22686128280,77770540116,144783290133,365331892456,928427248701,2354811032695 %N A182561 Position of first occurrence of n in A182535. %e A182561 First occurrence of 4 in A182535 has index 16, so a(4)=16. %o A182561 (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 */ %K A182561 nonn %O A182561 1,2 %A A182561 _Alex Ratushnyak_, May 05 2012 %E A182561 Corrected and extended by _Max Alekseyev_, Jan 31 2014