login

Year-end appeal: Please make a donation to the OEIS Foundation to support ongoing development and maintenance of the OEIS. We are now in our 61st year, we have over 378,000 sequences, and we’ve reached 11,000 citations (which often say “discovered thanks to the OEIS”).

Generalized Fermat numbers of the form (k+1)^2^m + k^2^m, with m>0.
3

%I #6 Mar 30 2012 17:22:27

%S 5,13,17,25,41,61,85,97,113,145,181,221,257,265,313,337,365,421,481,

%T 545,613,685,761,841,881,925,1013,1105,1201,1301,1405,1513,1625,1741,

%U 1861,1921,1985,2113,2245,2381,2521,2665,2813,2965,3121,3281,3445,3613,3697

%N Generalized Fermat numbers of the form (k+1)^2^m + k^2^m, with m>0.

%C It can be shown that, like the Fermat numbers, two of these generalized Fermat numbers are coprime if they have the same base k. However, unlike the Fermat numbers (which are conjectured to be squarefree), these generalized Fermat numbers are not necessarily squarefree for k > 1. Riesel tabulates some prime factors of generalized Fermat numbers for k <= 5.

%C For k=1, these are the Fermat numbers A000215. See A078901 for the case m>1, which excludes the sum of consecutive squares. By Legendre's theorem (Riesel, p. 165), the prime factors of a generalized Fermat number are of the form 1 + f 2^(m+1) for some integer f.

%D H. Riesel, "Prime numbers and computer methods for factorization," Second Edition, Progress in Mathematics, Vol. 126, Birkhauser, Boston, 1994, pp. 417-425.

%H T. D. Noe, <a href="http://www.sspectra.com/math/GenFermat.txt">Factorizations of Generalized Fermat Numbers</a>

%H Eric Weisstein's World of Mathematics, <a href="http://mathworld.wolfram.com/GeneralizedFermatNumber.html">Generalized Fermat Number</a>

%t mx=5000; maxK=Ceiling[Sqrt[mx/2]]; maxM=Ceiling[Log[2, Log[2, mx]]]; lst={}; Do[gf=(k+1)^2^m+k^2^m; If[gf<mx, AppendTo[lst, gf]], {k, maxK}, {m, 1, maxM}]; lst1=Union[lst]

%Y Cf. A000215, A078901.

%K easy,nonn

%O 0,1

%A _T. D. Noe_, Dec 12 2002