

A176173


4thlargest primefactor of nth product of 4 distinct primes.


0



7, 11, 13, 11, 17, 13, 19, 23, 17, 11, 19, 13, 29, 13, 31, 23, 37, 17, 11, 17, 29, 41, 19, 43, 31, 17, 19, 13, 47, 13, 19, 23, 37, 53, 23, 41, 59, 17, 23, 43, 61, 17, 29, 19, 47, 19, 13, 67, 29, 31, 19, 71, 13, 31, 73, 17, 53, 29, 23, 79, 23, 31, 37, 19, 59, 83, 23, 61, 37, 17
(list;
graph;
refs;
listen;
history;
text;
internal format)



OFFSET

1,1


COMMENTS

FactorInteger[210]=2*3*5*7,...


LINKS

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


MATHEMATICA

f0[n_]:=Last/@FactorInteger[n]=={1, 1, 1, 1}; f1[n_]:=Min[First/@FactorInteger[n]]; f2[n_]:=First/@FactorInteger[n][[2, 1]]; f3[n_]:=First/@FactorInteger[n][[3, 1]]; f4[n_]:=Max[First/@FactorInteger[n]]; lst={}; Do[If[f0[n], AppendTo[lst, f4[n]]], {n, 0, 2*7!}]; lst


CROSSREFS

Cf. A006881, A007304, A070647, A096916, A096917, A096918, A096919, A176170, A176171, A176172
Sequence in context: A213250 A226689 A117610 * A200327 A206546 A275516
Adjacent sequences: A176170 A176171 A176172 * A176174 A176175 A176176


KEYWORD

nonn


AUTHOR

Vladimir Joseph Stephan Orlovsky, Apr 10 2010


STATUS

approved



