|
Search: id:A073872
|
|
|
| A073872 |
|
Smallest positive triangular number not included earlier that is a multiple of n (a permutation of the triangular numbers). |
|
+0
3
|
|
| 1, 6, 3, 28, 10, 36, 21, 120, 45, 190, 55, 276, 78, 210, 15, 496, 136, 378, 171, 300, 105, 66, 253, 528, 325, 780, 351, 1176, 406, 630, 465, 2016, 231, 1326, 595, 2556, 666, 1596, 741, 2080, 820, 3486, 903, 1540, 990, 2346, 1081, 4560, 1225, 2850, 153, 5356
(list; graph; listen)
|
|
|
OFFSET
|
1,2
|
|
|
MATHEMATICA
|
a[n_] := a[n]=Module[{s, k, t}, s=a/@Range[1, n-1]; For[k=t=1, True, t+=++k, If[Mod[t, n]==0&&!MemberQ[s, t], Return[t]]]]
|
|
CROSSREFS
|
Cf. A073873, A073874.
Sequence in context: A088697 A039631 A066561 this_sequence A163913 A022666 A038257
Adjacent sequences: A073869 A073870 A073871 this_sequence A073873 A073874 A073875
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
Amarnath Murthy (amarnath_murthy(AT)yahoo.com), Aug 16 2002
|
|
EXTENSIONS
|
Edited by Dean Hickerson (dean.hickerson(AT)yahoo.com), Oct 15 2002
|
|
|
Search completed in 0.002 seconds
|
