id:A086358 - OEIS Search Results

Search: id:A086358

Displaying 1-1 of 1 results found.

page 1

Digital root of n!.

+0
1

1, 2, 6, 6, 3, 9, 9, 9, 9, 9, 9, 9, 9, 9, 9, 9, 9, 9, 9, 9, 9, 9, 9, 9, 9, 9, 9, 9, 9, 9, 9, 9, 9, 9, 9, 9, 9, 9, 9, 9, 9, 9, 9, 9, 9, 9, 9, 9, 9, 9, 9, 9, 9, 9, 9, 9, 9, 9, 9, 9, 9, 9, 9, 9, 9, 9, 9, 9, 9, 9, 9, 9, 9, 9, 9, 9, 9, 9, 9, 9, 9, 9, 9, 9, 9, 9, 9, 9, 9, 9, 9, 9, 9, 9, 9, 9, 9, 9, 9, 9, 9, 9, 9, 9, 9 (list; graph; listen)

	OFFSET	`1,2`
	FORMULA	`a(n) = A010888[n! ] = fixed-point of A007953[n! ]; It equals n! modulo(9); at r = 0 use 9.`
	EXAMPLE	`n=5, 5!=120, iteration list={120,3},a(5)=3.`
	MATHEMATICA	`sud[x_] := Apply[Plus, DeleteCases[IntegerDigits[x], 0]] Table[FixedPoint[sud, w! ], {w, 1, 128}]`
	CROSSREFS	`Cf. A086353-A086361, A007953, A010888, A038194, A029898.` `Adjacent sequences: A086355 A086356 A086357 this_sequence A086359 A086360 A086361` `Sequence in context: A097412 A105815 A136696 this_sequence A004152 A071678 A141329`
	KEYWORD	`base,nonn`
	AUTHOR	`Labos E. (labos(AT)ana.sote.hu), Jul 21 2003`

page 1

Search completed in 0.002 seconds

Last modified October 7 08:31 EDT 2008. Contains 144667 sequences.

AT&T Labs Research