id:A061850 - OEIS Search Results

Search: id:A061850

Displaying 1-1 of 1 results found.

page 1

Squares whose consecutive digits vary by at most 1.

+0
1

0, 1, 4, 9, 100, 121, 676, 10000, 12100, 12321, 1000000, 1210000, 1232100, 1234321, 100000000, 121000000, 123210000, 123432100, 123454321, 10000000000, 12100000000, 12321000000, 12343210000, 12345432100, 12345654321 (list; graph; listen)

	OFFSET	`0,3`
	EXAMPLE	`676 = 26^2 and 6 and 7 differ by at most 1`
	MATHEMATICA	`For[i=1, i>0, i++, a=IntegerDigits[i^2]; b=Max[Abs[a-RotateRight[a]]]; If[b<2, Print[i^2]]]`
	CROSSREFS	`Sequence in context: A069707 A129967 A087553 this_sequence A061459 A061869 A061270` `Adjacent sequences: A061847 A061848 A061849 this_sequence A061851 A061852 A061853`
	KEYWORD	`base,nonn`
	AUTHOR	`Erich Friedman (efriedma(AT)stetson.edu), Jun 23 2001`

page 1

Search completed in 0.002 seconds

Last modified December 17 23:40 EST 2009. Contains 171025 sequences.

AT&T Labs Research