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 A146211 #20 Oct 13 2023 10:02:26 %S A146211 16,104,5368,40880,2532160,20390552,1364393896,788854912240, %T A146211 6641649422408,4056611764783760,296528425830656800, %U A146211 2544627654221217656,188573151481968108424,121907205457107043376080 %N A146211 Fermat quotient of the n-th prime with base 3. %H A146211 Takashi Agoh and Ladislav Skula, <a href="http://dx.doi.org/10.1016/j.jnt.2008.06.001">The fourth power of the Fermat quotient</a>, J. Numb. Theory 128 (2008) 2865-2873. %F A146211 a(n) = (3^(p-1)-1)/p, where p=A000040(n). %F A146211 a(n) = A046211(A000040(n)), for n >= 3. - _Amiram Eldar_, Oct 13 2023 %p A146211 A146211:= n-> map (p-> (3^(p-1)-1)/p, ithprime(n)): %p A146211 seq (A146211(n), n=3..16); # _Jani Melik_, Jan 24 2010 %t A146211 Table[(3^(p - 1) - 1)/p, {p, Prime[Range[3, 16]]}] (* _Amiram Eldar_, Oct 13 2023 *) %o A146211 (PARI) a(n) = my(p=prime(n)); (3^(p-1)-1)/p; \\ _Michel Marcus_, Oct 13 2023 %Y A146211 Subsequence of A046211. Cf. A007663. %K A146211 easy,nonn %O A146211 3,1 %A A146211 _R. J. Mathar_, Oct 28 2008