|
| |
|
|
A096919
|
|
Greatest prime-factor of n-th product of 3 distinct primes.
|
|
7
| |
|
|
5, 7, 11, 7, 13, 17, 7, 11, 19, 13, 23, 11, 11, 17, 29, 13, 31, 19, 13, 37, 23, 11, 17, 41, 17, 43, 19, 13, 47, 19, 13, 29, 31, 53, 23, 23, 59, 17, 61, 37, 17, 11, 19, 67, 29, 41, 19, 71, 13, 43, 31, 29, 73, 17, 13, 31, 47, 79, 23, 19, 83, 23, 37, 53, 89, 37, 17, 41, 97, 59
(list; graph; refs; listen; history; internal format)
|
|
|
|
OFFSET
| 1,1
|
|
|
COMMENTS
| A096917(n)*A096918(n)*a(n)=A007304(n); A096917(n) < A096918(n)<a(n);
a(n) = A006530(A007304(n)).
|
|
|
MATHEMATICA
| f[n_]:=Last/@FactorInteger[n]=={1, 1, 1}; f1[n_]:=Min[First/@FactorInteger[n]]; f2[n_]:=Max[First/@FactorInteger[n]]; lst={}; Do[If[f[n], AppendTo[lst, f2[n]]], {n, 0, 7!}]; lst [From Vladimir Orlovsky (4vladimir(AT)gmail.com), Apr 10 2010]
|
|
|
CROSSREFS
| Sequence in context: A076546 A167372 A023590 * A023594 A104200 A115044
Adjacent sequences: A096916 A096917 A096918 * A096920 A096921 A096922
|
|
|
KEYWORD
| nonn
|
|
|
AUTHOR
| Reinhard Zumkeller (reinhard.zumkeller(AT)gmail.com), Jul 15 2004
|
| |
|
|
