id:A153880 - OEIS Search Results

Search: id:A153880

Displaying 1-1 of 1 results found.

page 1

a(n) has the factorial expansion of n shifted once left.

+0
2

0, 2, 6, 8, 12, 14, 24, 26, 30, 32, 36, 38, 48, 50, 54, 56, 60, 62, 72, 74, 78, 80, 84, 86, 120, 122, 126, 128, 132, 134, 144, 146, 150, 152, 156, 158, 168, 170, 174, 176, 180, 182, 192, 194, 198, 200, 204, 206, 240, 242, 246, 248, 252, 254, 264, 266, 270, 272 (list; graph; listen)

	OFFSET	`0,2`
	EXAMPLE	`Factorial expansion for 5 is A007623(5) = 21. Shifting this once left yields 210, which is factorial expansion for 14. Thus a(5)=14.`
	PROGRAM	`(Other) (MIT Scheme): (define (A153880 n) (let loop ((n n) (z 0) (i 2) (f 2)) (cond ((zero? n) z) (else (loop (floor->exact (/ n i)) (+ (* f (modulo n i)) z) (1+ i) (* f (+ i 1)))))))`
	CROSSREFS	`A153883(n) = a(n)/2. Cf. also A007623.` `Sequence in context: A108187 A102166 A024894 this_sequence A120227 A138626 A064796` `Adjacent sequences: A153877 A153878 A153879 this_sequence A153881 A153882 A153883`
	KEYWORD	`base,nonn`
	AUTHOR	`Antti Karttunen (Antti.Karttunen(AT)gmail.com), Jan 03 2009`

page 1

Search completed in 0.002 seconds

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

AT&T Labs Research