A100382 Record values of A062700.
3, 7, 13, 31, 127, 307, 1093, 1723, 2801, 3541, 8191, 10303, 19531, 28057, 30941, 131071, 147073, 524287, 797161, 830833, 1191373, 1204507, 1353733, 1395943, 1424443, 1482307, 1886503, 2037757, 2212657, 2432041, 2507473, 2922391
Offset: 1
Keywords
Links
- Chai Wah Wu, Table of n, a(n) for n = 1..10000
Crossrefs
Programs
-
Magma
S:=[]; a:=0; for n in [1..3000000] do c:=SumOfDivisors(n); if IsPrime(c) and a lt c then Append(~S,c); a:=c; end if; end for; S; // Klaus Brockhaus, Oct 21 2009
Extensions
More terms from Ryan Propper, Jul 13 2005
Edited, corrected and extended by Klaus Brockhaus, Oct 21 2009
Comments