id:A038570 - OEIS Search Results

Search: id:A038570

Displaying 1-1 of 1 results found.

page 1

Second derivative of n.

+0
4

0, 0, 0, 0, 1, 0, 0, 0, 2, 3, 0, 1, 1, 0, 0, 0, 4, 5, 6, 7, 1, 0, 3, 2, 2, 3, 0, 1, 1, 0, 0, 0, 8, 9, 10, 11, 13, 12, 15, 14, 2, 3, 0, 1, 7, 6, 5, 4, 4, 5, 6, 7, 1, 0, 3, 2, 2, 3, 0, 1, 1, 0, 0, 0, 16, 17, 18, 19, 21, 20, 23, 22, 26, 27, 24, 25, 31, 30, 29, 28, 4, 5, 6, 7, 1, 0, 3, 2, 14, 15, 12 (list; graph; listen)

	OFFSET	`0,9`
	MATHEMATICA	`dtn[ L_ ] := Fold[ 2#1+#2&, 0, L ]; f[ n_ ] := dtn[ Map[ Abs[ #[ [ 1 ] ]-#[ [ 2 ] ] ]&, Partition[ IntegerDigits[ n, 2 ], 2, 1 ] ] ]; Table[ f[ f[ n ] ], {n, 0, 120} ]`
	CROSSREFS	`Cf. A038554.` `Sequence in context: A064722 A123735 A135814 this_sequence A103498 A030386 A096799` `Adjacent sequences: A038567 A038568 A038569 this_sequence A038571 A038572 A038573`
	KEYWORD	`nonn,easy,nice`
	AUTHOR	`njas`
	EXTENSIONS	`More terms from Erich Friedman (erich.friedman(AT)stetson.edu)`

page 1

Search completed in 0.002 seconds

Last modified November 21 14:49 EST 2008. Contains 150807 sequences.

AT&T Labs Research