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 A056214 #16 Jun 29 2021 05:55:22 %S A056214 73,1423,1459,2377,2503,3457,7741,9433,10891,10909,16057,17299,17623, %T A056214 20269,21313,22699,24103,26263,28621,28927,29629,30817,32257,34273, %U A056214 34327,35461,35731,36343,36793,37549,37567,37657,38737,39367,39979 %N A056214 Primes p whose period of reciprocal equals (p-1)/9. %C A056214 Cyclic numbers of the ninth degree (or ninth order): the reciprocals of these numbers belong to one of nine different cycles. Each cycle has the (number minus 1)/9 digits. %H A056214 Amiram Eldar, <a href="/A056214/b056214.txt">Table of n, a(n) for n = 1..10000</a> %H A056214 <a href="/index/1#1overn">Index entries for sequences related to decimal expansion of 1/n</a> %t A056214 f[n_Integer] := Block[{ds = Divisors[n - 1]}, (n - 1)/Take[ ds, Position[ PowerMod[ 10, ds, n], 1] [[1, 1]]] [[ -1]]]; Select[ Prime[ Range[4, 5000]], f[ # ] == 9 &] %Y A056214 Cf. A097443, A055628, A056157, A056210, A056211, A056212, A056213, A056215, A056216, A056217, A098680, A135073. %K A056214 nonn,base %O A056214 1,1 %A A056214 _Robert G. Wilson v_, Aug 02 2000 %E A056214 Edited by _N. J. A. Sloane_, Apr 30 2007