OFFSET
1,1
COMMENTS
The 30th row of A127730.
The ansatz 30*n/(30+n)=j (any integer j) yields n=30*j/(30-j) which demonstrates that the sequence is finite if n>=0. [R. J. Mathar, Jul 13 2009]
MATHEMATICA
f[a_, b_]:=(a*b)/(a+b); a=30; lst={}; Do[If[f[a, n]==IntegerPart[f[a, n]], AppendTo[lst, n]], {n, 9!}]; lst
Select[Range[1000], IntegerQ[(30#)/(30+#)]&] (* Harvey P. Dale, Sep 25 2019 *)
CROSSREFS
KEYWORD
nonn,fini,full
AUTHOR
Vladimir Joseph Stephan Orlovsky, Jul 10 2009
EXTENSIONS
Edited by R. J. Mathar, Jul 13 2009
STATUS
approved