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 A211450 #3 Apr 11 2012 20:02:47 %S A211450 1,1,0,1,2,3,1,2,1,2,10,1,2,1,1,1,2,2,3,14,1,2,1,2,1,4,1,1,4,1,3,2,1, %T A211450 2,4,2,1,3,1,1,2,12,10,1,1,6,6,1,1,2,1,2,6,10,1,1,4,10,1,2,1,1,1,2,39, %U A211450 1,2,3,1,2,1,2,3,1,18,1,4,1,16,24,2,2,2,1 %N A211450 (p-1)/x, where p = prime(n) and x = ord(5,p), the smallest positive integer such that 5^x == 1 mod p. %H A211450 T. D. Noe, <a href="/A211450/b211450.txt">Table of n, a(n) for n = 1..1000</a> %t A211450 nn = 5; Table[If[Mod[nn, p] == 0, 0, (p-1)/MultiplicativeOrder[nn, p]], {p, Prime[Range[100]]}] %Y A211450 Cf. A001917, A094593, A211449, A211451, A211452, A211453, A211454, A006556. %K A211450 nonn %O A211450 1,5 %A A211450 _T. D. Noe_, Apr 11 2012