id:A108585 - OEIS Search Results

Search: id:A108585

Displaying 1-1 of 1 results found.

page 1

a(n) = a(n-1)+2*A005185(n).

+0
1

2, 6, 12, 18, 26, 36, 46, 58, 70, 82, 98, 114, 130, 150, 168, 188, 210, 232, 256, 280, 304, 328, 360, 388, 416, 448, 480, 512, 544, 584, 618, 652, 692, 734, 772, 812, 856, 898, 942, 988, 1034, 1082, 1130, 1178, 1226, 1274, 1338, 1386, 1436, 1496, 1552, 1604 (list; graph; listen)

	OFFSET	`0,1`
	COMMENT	`Uses A005185 as a prime-like gap sequence.`
	MATHEMATICA	`Hofstadter[0] = Hofstadter[1] = 1 Hofstadter[n_Integer?Positive] := Hofstadter[n] = Hofstadter[n - Hofstadter[n - 1]] + Hofstadter[n - Hofstadter[n - 2]] a[1] = 2; a[n_] := a[n] = a[n - 1] + 2*Hofstadter[n] c = Table[a[n], {n, 1, 200}]`
	CROSSREFS	`Cf. A005185.` `Sequence in context: A085345 A032371 A162802 this_sequence A159793 A006511 A113274` `Adjacent sequences: A108582 A108583 A108584 this_sequence A108586 A108587 A108588`
	KEYWORD	`nonn`
	AUTHOR	`Roger L. Bagula (rlbagulatftn(AT)yahoo.com), Jul 05 2005`

page 1

Search completed in 0.002 seconds

Last modified November 25 20:09 EST 2009. Contains 167514 sequences.

AT&T Labs Research