|
Search: id:A075250
|
|
|
| A075250 |
|
y-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 z components are in A075249 and A075251. |
|
+0
4
|
|
| 2, 5, 3, 4, 5, 9, 19, 7, 9, 13, 20, 43, 13, 17, 23, 37, 77, 21, 27, 37, 58, 121, 31, 40, 55, 85, 175, 43, 56, 75, 116, 239, 57, 73, 99, 153, 313, 73, 93, 127, 194, 397, 91, 116, 157, 241, 491, 111, 141, 191, 292, 595, 133, 169, 229, 349, 709, 157, 95, 269, 410, 833
(list; graph; listen)
|
|
|
OFFSET
|
3,1
|
|
|
COMMENT
|
See A075248 for more details.
|
|
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++ ]]; yLst
|
|
CROSSREFS
|
Cf. A075248, A075249, A075251.
Sequence in context: A077057 A030660 A011310 this_sequence A060127 A065184 A065181
Adjacent sequences: A075247 A075248 A075249 this_sequence A075251 A075252 A075253
|
|
KEYWORD
|
hard,nice,nonn
|
|
AUTHOR
|
T. D. Noe (noe(AT)sspectra.com), Sep 10 2002
|
|
|
Search completed in 0.002 seconds
|
