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.

A111134 Numbers of the form p^(p^k-1) (p prime, k>=0).

This page as a plain text file.
%I A111134 #10 Aug 02 2024 01:55:19
%S A111134 1,2,8,9,128,625,6561,32768,117649,2147483648,25937424601,
%T A111134 2541865828329,23298085122481,59604644775390625,9223372036854775808,
%U A111134 48661191875666868481,104127350297911241532841,907846434775996175406740561329,147808829414345923316083210206383297601
%N A111134 Numbers of the form p^(p^k-1) (p prime, k>=0).
%C A111134 The refactorable prime powers A000961.
%H A111134 Amiram Eldar, <a href="/A111134/b111134.txt">Table of n, a(n) for n = 1..102</a>
%t A111134 f[p_, max_] := Module[{k = 1, s = {}, r}, While[(r = p^(p^k - 1)) < max, AppendTo[s, r]; k++]; s]; seq[max_] := Module[{s = {1}, p = 2, s1}, While[(s1 = f[p, max]) != {}, s = Join[s, s1]; p = NextPrime[p]]; Union[s]]; seq[10^30] (* _Amiram Eldar_, Aug 01 2024 *)
%Y A111134 Intersection of A000961 and A033950.
%Y A111134 The sequence forms a subsequence of the refactorable numbers A033950; on the other hand A036878 is a subsequence.
%K A111134 nonn
%O A111134 1,2
%A A111134 _Franz Vrabec_, Oct 17 2005
%E A111134 More terms from _Robert G. Wilson v_, Oct 21 2005
%E A111134 a(18)-a(19) from _Amiram Eldar_, Aug 01 2024