|
|
A075251
|
|
z-value of the solution (x,y,z) to 5/n = 1/x + 1/y + 1/z satisfying 0 < x < y < z and having the largest z-value. The x and y components are in A075249 and A075250.
|
|
3
|
|
|
6, 20, 6, 12, 70, 72, 342, 42, 99, 156, 780, 1806, 156, 272, 1564, 1332, 5852, 420, 945, 4070, 6670, 14520, 930, 1560, 2970, 7140, 30450, 1806, 1736, 16800, 26796, 56882, 3192, 5256, 29304, 23256, 97656, 5256, 11439, 16002, 75078, 157212, 8190, 13340
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
3,1
|
|
COMMENTS
|
See A075248 for more details.
|
|
LINKS
|
Table of n, a(n) for n=3..46.
|
|
MATHEMATICA
|
For[xLst={}; yLst={}; zLst={}; n=3, n<=100, n++, cnt=0; xr=n/5; If[IntegerQ[xr], x=xr+1, x=Ceiling[xr]]; While[yr=1/(5/n-1/x); If[IntegerQ[yr], y=yr+1, y=Ceiling[yr]]; cnt==0&&y>x, While[zr=1/(5/n-1/x-1/y); cnt==0&&zr>y, If[IntegerQ[zr], z=zr; cnt++; AppendTo[xLst, x]; AppendTo[yLst, y]; AppendTo[zLst, z]]; y++ ]; x++ ]]; zLst
|
|
CROSSREFS
|
Cf. A075248, A075249, A075250.
Sequence in context: A224919 A282377 A281936 * A090590 A002566 A087998
Adjacent sequences: A075248 A075249 A075250 * A075252 A075253 A075254
|
|
KEYWORD
|
hard,nice,nonn
|
|
AUTHOR
|
T. D. Noe, Sep 10 2002
|
|
STATUS
|
approved
|
|
|
|