A110465 Prime numbers that when multiplied in order yield the sequence of oddly colossally abundant numbers A110464.

3, 5, 3, 7, 11, 13, 3, 5, 17, 19, 23, 29, 31, 7, 3, 37, 41, 43, 47, 53, 59, 5, 61, 67, 71, 73, 11, 79, 83, 3, 89, 97, 13, 101, 103, 107, 109, 113, 127, 131, 137, 139, 149, 151, 7, 157, 163, 167, 17, 173, 179, 181, 191, 193, 197, 199, 19, 211, 3, 223, 227, 229, 5, 233, 239

Offset

1,1

Comments

This is sequence A073751 without the "2" terms.

Links

Table of n, a(n) for n=1..65.

Mathematica

maxN=100; f={{3, 1}, {5, 0}}; primes=1; lst={3}; x=Table[pFactor[f[[i]]], {i, primes+1}]; For[n=2, n<=maxN, n++, i=Position[x, Max[x]][[1, 1]]; AppendTo[lst, f[[i, 1]]]; f[[i, 2]]++; If[i>primes, primes++; AppendTo[f, {Prime[i+2], 0}]; AppendTo[x, pFactor[f[[ -1]]]]]; x[[i]]=pFactor[f[[i]]]]; lst

Crossrefs

Cf. A004490 (colossally abundant numbers).

Sequence in context: A240499 A248511 A210191 * A354528 A328915 A100338

Adjacent sequences: A110462 A110463 A110464 * A110466 A110467 A110468

Keyword

nonn

Author

T. D. Noe, Jul 21 2005

Status

approved