id:A080339 - OEIS Search Results

Search: id:A080339

Displaying 1-1 of 1 results found.

page 1

Characteristic function of {1} union {primes}: 1 if n is 1 or a prime, else 0.

+0
4

1, 1, 1, 0, 1, 0, 1, 0, 0, 0, 1, 0, 1, 0, 0, 0, 1, 0, 1, 0, 0, 0, 1, 0, 0, 0, 0, 0, 1, 0, 1, 0, 0, 0, 0, 0, 1, 0, 0, 0, 1, 0, 1, 0, 0, 0, 1, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, 1, 0, 1, 0, 0, 0, 0, 0, 1, 0, 0, 0, 1, 0, 1, 0, 0, 0, 0, 0, 1, 0, 0, 0, 1, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 1, 0, 1, 0 (list; graph; listen)

	OFFSET	`1,1`
	LINKS	`Eric Weisstein's World of Mathematics, Prime Formulas`
	FORMULA	`a(n)=Sum_digits{binomial(n! mod (n+1),n)}, with n>=0 - Paolo P. Lava (ppl(AT)spl.at), Apr 24 2007`
	MAPLE	`P:=proc(n) local i, k, w; for i from 0 by 1 to n do w:=0; k:=binomial(i! mod (i+1), i); while k>0 do w:=w+k-(trunc(k/10)*10); k:=trunc(k/10); od; print(w); od; end: P(1000); - Paolo P. Lava (ppl(AT)spl.at), Apr 24 2007`
	CROSSREFS	`Cf. A010051, A080355.` `Adjacent sequences: A080336 A080337 A080338 this_sequence A080340 A080341 A080342` `Sequence in context: A082416 A093996 A083187 this_sequence A100923 A050073 A120474`
	KEYWORD	`nonn`
	AUTHOR	`njas, Mar 21 2003`

page 1

Search completed in 0.002 seconds

Last modified October 7 14:39 EDT 2008. Contains 144666 sequences.

AT&T Labs Research