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 A091283 #4 Oct 15 2013 22:32:22 %S A091283 0,4,4,5,4,4,6,4,5,4,7,4,5,4,6,4,4,4,4,5,5,6,4,5,7,4,5,4,4,6,9,4,5,4, %T A091283 4,5,4,4,5,4,4,4,8,8,4,5,4,7,4,4,5,6,6,4,10,5,4,6,4,5,4,4,4,5,5,4,4,6, %U A091283 4,4,7,5,6,4,4,9,4,4,6,5,4,4,6,6,5,4,8,5,4,6,4,7,5,4,4,5,4,5,4,4,4,4,4,5,4 %N A091283 Exponent of 2 in -1+prime[n]^s, if s is an exponent of the form s=8k-4. %t A091283 Table[{8*k-4, Table[Part[Flatten[FactorInteger [ -1+Prime[n]^(8*k-4)]], 2], {n, 2, m}]}, {k, 1, 2}] %Y A091283 Cf. A091282, A090739, A090740, A090129, A023506. %K A091283 nonn %O A091283 1,2 %A A091283 _Labos Elemer_, Jan 22 2004