A153880 - OEIS

This site is supported by donations to The OEIS Foundation.

A153880

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

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; refs; listen; history; internal format)

	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.`
	PROG	`(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 * A120227 A138626 A178406` `Adjacent sequences: A153877 A153878 A153879 * A153881 A153882 A153883`
	KEYWORD	`base,nonn`
	AUTHOR	`Antti Karttunen (Antti.Karttunen(AT)gmail.com), Jan 03 2009`

Content is available under The OEIS End-User License Agreement .

Last modified February 14 15:39 EST 2012. Contains 205635 sequences.