A178226 - OEIS

The OEIS is supported by the many generous donors to the OEIS Foundation.

A178226

Characteristic function of A154809 (numbers that are not binary palindromes)

0, 0, 1, 0, 1, 0, 1, 0, 1, 0, 1, 1, 1, 1, 1, 0, 1, 0, 1, 1, 1, 0, 1, 1, 1, 1, 1, 0, 1, 1, 1, 0, 1, 0, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 0, 1, 1, 1, 1, 1, 0, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 0, 1, 0, 1, 1, 1, 1, 1, 1, 1, 0, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 0, 1, 1, 1, 1, 1, 1, 1, 0, 1, 1, 1, 1, 1, 0, 1, 1, 1, 1, 1 (list; graph; refs; listen; history; text; internal format)

	OFFSET	`0,1`
	COMMENTS	`a(n)=1 if n is in A154809, a(n)=0 otherwise.` `Identical to parity of A086757 (Smallest prime p such that n is a palindrome in base p representation)`
	LINKS	`Antti Karttunen, Table of n, a(n) for n = 0..65537` `Index entries for sequences related to binary expansion of n` `Index entries for characteristic functions`
	FORMULA	`a(n) = 1 - A178225(n). - Antti Karttunen, Dec 15 2017`
	PROG	`(PARI) A178226(n) = (n!=subst(Polrev(binary(n)), x, 2)); \\ Antti Karttunen, Dec 15 2017`
	CROSSREFS	`Cf. A030101, A057891, A086757, A154809, A178225, A280505, A280506.` `Sequence in context: A144599 A144608 A327208 * A288622 A095907 A056051` `Adjacent sequences: A178223 A178224 A178225 * A178227 A178228 A178229`
	KEYWORD	`base,easy,nonn`
	AUTHOR	`Jeremy Gardiner, May 23 2010`
	STATUS	`approved`

License Agreements, Terms of Use, Privacy Policy. .

Last modified March 24 18:08 EDT 2023. Contains 361510 sequences. (Running on oeis4.)