The On-Line Encyclopedia of Integer Sequences (OEIS)

Revision History for A169695

(Bold, blue-underlined text is an addition; faded, red-underlined text is a ~~deletion~~.)
Showing entries 1-10 | older changes

A169695

a(n) = 1 if n is a square, otherwise a(n) = 2.
(history; published version)

#30 by Michel Marcus at Wed Apr 17 02:34:50 EDT 2024

STATUS

reviewed

approved

#29 by Joerg Arndt at Wed Apr 17 02:18:51 EDT 2024

STATUS

proposed

reviewed

#28 by Amiram Eldar at Wed Apr 17 02:06:54 EDT 2024

STATUS

editing

proposed

#27 by Amiram Eldar at Wed Apr 17 02:04:56 EDT 2024

LINKS

<a href="/index/Eu#epf">Index entries for sequences computed from exponents in factorization of n</a>.

FORMULA

a(n) = A000005(n)-A161840(n), n >= 1. (End)

(End)

#26 by Amiram Eldar at Wed Apr 17 01:54:02 EDT 2024

PROG

(PARI) a(n) = 2 - issquare(n); \\ Amiram Eldar, Apr 17 2024

STATUS

approved

editing

#25 by R. J. Mathar at Fri Jan 04 07:12:51 EST 2019

STATUS

editing

approved

#24 by R. J. Mathar at Fri Jan 04 07:12:41 EST 2019

CROSSREFS

Cf. A010052, A275437.

STATUS

approved

editing

#23 by Susanna Cuyler at Fri Nov 03 09:56:09 EDT 2017

STATUS

proposed

approved

#22 by Michael De Vlieger at Fri Nov 03 09:55:12 EDT 2017

STATUS

editing

proposed

#21 by Michael De Vlieger at Fri Nov 03 09:55:08 EDT 2017

MATHEMATICA

Array[2 - Boole[IntegerQ@ Sqrt@ #] &, 105, 0] (* Michael De Vlieger, Nov 03 2017 *)

STATUS

proposed

editing