cp's OEIS Frontend

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.

A067999 Numbers k such that (k! - 1) == 0 (mod prime(k)).

This page as a plain text file.
%I A067999 #18 Feb 11 2021 01:36:22
%S A067999 1,3,10,149,437
%N A067999 Numbers k such that (k! - 1) == 0 (mod prime(k)).
%C A067999 There are no more terms through 5000000. - _Ryan Propper_, Dec 30 2007
%C A067999 Numbers k such that A091858(k) = 1. - _Zak Seidov_, Oct 05 2012
%t A067999 f[n_] := Block[{k = p = 1, m = Prime[n]}, While[p = Mod[p k, m]; k < n, k++ ]; p]; Do[ If[ f[n] == 1, Print[n]], {n, 100000}] (* _Robert G. Wilson v_, Mar 16 2004 *)
%Y A067999 Cf. A068000, A091858.
%K A067999 nonn,more
%O A067999 1,2
%A A067999 _Robert G. Wilson v_, Feb 08 2002