A063428 a(n) is the smallest positive integer of the form n*k/(n+k).
1, 2, 2, 4, 2, 6, 4, 6, 5, 10, 3, 12, 7, 6, 8, 16, 6, 18, 4, 12, 11, 22, 6, 20, 13, 18, 12, 28, 5, 30, 16, 22, 17, 10, 9, 36, 19, 26, 8, 40, 6, 42, 22, 18, 23, 46, 12, 42, 25, 34, 26, 52, 18, 30, 7, 38, 29, 58, 10, 60, 31, 14, 32, 40, 22, 66, 34, 46, 20, 70, 8, 72, 37, 30, 38, 28, 26
Offset: 2
Keywords
Examples
a(6) = 2 because 6*3/(6+3) = 2 is the smallest integer of the form 6*k/(6+k). a(10) = 5 since 1/10 + 1/10 = 1/5, 1/10 + 1/15 = 1/6, 1/10 + 1/40 = 1/8, 1/10 + 1/90 = 1/9 and so the first sum provides the value.
Links
- Harry J. Smith, Table of n, a(n) for n = 2..1000
Programs
-
Mathematica
spi[n_]:=Module[{k=1},While[!IntegerQ[(n*k)/(n+k)],k++];(n*k)/(n+k)]; Array[ spi,80,2] (* Harvey P. Dale, May 05 2022 *) -
PARI
a(n)={my(k=1); if(n>1, while (n*k%(n + k), k++); n*k/(n + k))} \\ Harry J. Smith, Aug 20 2009
Formula
If n is prime a(n) = n - 1. - Benoit Cloitre, Dec 31 2001
Extensions
New description from Benoit Cloitre, Dec 31 2001
Entry revised by N. J. A. Sloane, Feb 13 2007
Definition revised by Franklin T. Adams-Watters, Aug 07 2009
Comments