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 A094808 #22 Jul 20 2025 15:15:58 %S A094808 5,136,10959,26840,2495955,10021808981,25377192720,2681584376185, %T A094808 113220181313816,12360536835574179,3507176714646157575, %U A094808 152669979363491409744,5030798638073511770858765,222738121208382108330061096,25556388788416277561281235799,66021302497942406531221230200 %N A094808 Numbers of the form Fibonacci(p-1)/p, where p are primes ending in 1 or 9 (i.e., A045468). %H A094808 Harvey P. Dale, <a href="/A094808/b094808.txt">Table of n, a(n) for n = 1..316</a> %t A094808 s = Select[ Prime[ Range[35]], Mod[ #, 10] == 1 || Mod[ #, 10] == 9 &]; Fibonacci[s - 1]/s (* _Robert G. Wilson v_, Jun 15 2004 *) %t A094808 Fibonacci[#-1]/#&/@Select[Prime[Range[40]],MemberQ[{1,9},Mod[#,10]]&] (* _Harvey P. Dale_, Jul 20 2025 *) %o A094808 (PARI) forprime(p=11, 10^3, if((p+3)%5<2, next); print1(fibonacci(p-1)/p, ", ")); \\ _Jinyuan Wang_, Feb 24 2020 %Y A094808 Cf. A045468, A094809, A096028. %K A094808 nonn %O A094808 1,1 %A A094808 _Lekraj Beedassy_, Jun 11 2004 %E A094808 More terms from _Robert G. Wilson v_, Jun 15 2004 %E A094808 More terms from _Jinyuan Wang_, Feb 24 2020