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 A262348 #27 Feb 16 2025 08:33:27 %S A262348 0,0,1,2,2,1,10,17,19,17,5,17,75,17,257,983,987,1481,4178,4652,7433, %T A262348 3488,10665,19169,51372,538,257,65537,422030,17,111134,430622,592107, %U A262348 1036631,4104877,11311649,4963932,23430341,16834037,65537,67016878,53547017,316617399 %N A262348 a(n) = A000215(n) mod A000045(n). %H A262348 Eric Weisstein's World of Mathematics, <a href="https://mathworld.wolfram.com/FermatNumber.html">Fermat Number</a> %H A262348 Eric Weisstein's World of Mathematics, <a href="https://mathworld.wolfram.com/FibonacciNumber.html">Fibonacci Number</a> %t A262348 f[n_] := Mod[ PowerMod[2, 2^n, Fibonacci[n]] + 1, Fibonacci[n]]; Array[f, 43] (* _Robert G. Wilson v_, Sep 18 2015 *) %o A262348 (Magma) [(2^(2^n) + 1) mod(Fibonacci(n)): n in [1..29]]; // _Vincenzo Librandi_, Sep 19 2015 %o A262348 (PARI) a(n) = my (fn = fibonacci(n)); lift(Mod(Mod(2, fn)^(2^n) + 1, fn)); \\ _Michel Marcus_, Sep 19 2015 %Y A262348 Cf. A000045, A000215, A182213, A246846. %K A262348 nonn %O A262348 1,4 %A A262348 _Ilya Gutkovskiy_, Sep 18 2015 %E A262348 More terms from _Robert G. Wilson v_, Sep 18 2015