|
| |
|
|
A162822
|
|
Positive numbers n such that 36*n/(36-n) are integers.
|
|
7
| |
|
|
9, 12, 18, 20, 24, 27, 28, 30, 32, 33, 34, 35, 36, 37, 38, 39, 40, 42, 44, 45, 48, 52, 54, 60, 63, 72, 84, 90, 108, 117, 144, 180, 198, 252, 360, 468, 684, 1332
(list; graph; refs; listen; history; internal format)
|
|
|
|
OFFSET
| 1,1
|
|
|
COMMENTS
| The number n=36 is explicitly included, treating the result of division through zero as an integer.
Row 36 of A191973.
|
|
|
MAPLE
| for m from 1 to 1332 do if(m=36 or m*36 mod (m-36) = 0)then printf("%d, ", m): fi: od: # Nathaniel Johnston, Jun 22 2011
|
|
|
MATHEMATICA
| f[a_, b_]:=(a*b)/(a-b); a=36; lst={}; Do[If[f[a, n]==IntegerPart[f[a, n]], AppendTo[lst, n]], {n, 9!}]; lst
Sort[Join[{36}, Select[Range[1500], IntegerQ[(36#)/(36-#)]&]]] (* From Harvey P. Dale, Mar 23 2011 *)
|
|
|
CROSSREFS
| Cf. A162688, A162689, A162690, A162691, A162692, A162693, A162694, A162817, A162818, A162819, A162820, A162821, A191973.
Sequence in context: A199593 A174525 A141552 * A087269 A153973 A072702
Adjacent sequences: A162819 A162820 A162821 * A162823 A162824 A162825
|
|
|
KEYWORD
| nonn,fini,full,easy
|
|
|
AUTHOR
| Vladimir Orlovsky (4vladimir(AT)gmail.com), Jul 13 2009
|
|
|
EXTENSIONS
| Keywords fini,full added by R. J. Mathar (mathar(AT)strw.leidenuniv.nl), Jul 31 2009
|
| |
|
|
