|
Search: id:A087261
|
|
|
| A087261 |
|
a(n)=LCM[4n, A025586(4n)], least common multiple of 4n and the largest value in 3x+1 iteration list started at 4n. |
|
+0
3
|
|
| 4, 8, 48, 16, 20, 24, 364, 32, 468, 40, 572, 48, 52, 56, 480, 64, 68, 72, 1672, 80, 84, 88, 3680, 96, 100, 104, 249264, 112, 116, 480, 286192, 128, 132, 136, 1120, 144, 148, 152, 11856, 160, 378512, 168, 8428, 176, 180, 184, 433904, 192, 196, 200, 11832, 208, 212
(list; graph; listen)
|
|
|
OFFSET
|
1,1
|
|
|
MATHEMATICA
|
c[x_] := (1-Mod[x, 2])*(x/2)+Mod[x, 2]*(3*x+1)c[1]=1; fpl[x_] := Delete[FixedPointList[c, x], -1] Table[LCM[4*w, Max[fpl[4*w]]], {w, 1, 256}]
|
|
CROSSREFS
|
Cf. A025586, A033496-A087260.
Sequence in context: A163343 A045639 A002470 this_sequence A078236 A054881 A076687
Adjacent sequences: A087258 A087259 A087260 this_sequence A087262 A087263 A087264
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
Labos E. (labos(AT)ana.sote.hu), Sep 09 2003
|
|
|
Search completed in 0.002 seconds
|
