A269860 Numbers n such that n and A048673(n) are of the same parity.

1, 2, 3, 6, 8, 9, 11, 13, 18, 20, 22, 23, 24, 25, 26, 27, 28, 31, 32, 33, 35, 37, 39, 46, 47, 49, 50, 54, 59, 60, 62, 66, 68, 69, 70, 71, 72, 74, 75, 76, 78, 80, 81, 83, 84, 85, 88, 89, 93, 94, 95, 96, 97, 98, 99, 104, 105, 107, 109, 111, 112, 116, 117, 118, 119, 121, 128, 131, 133, 138, 139, 141, 142, 143, 145, 147, 150

Offset: 1

Author

Antti Karttunen, Mar 16 2016

Keywords

• nonn

Comments

Union of odd terms of A246261 and even terms of A246263.

Links

• Antti Karttunen, Table of n, a(n) for n = 1..10000

Crossrefs

Complement: A269861.

Cf. A048674 (a subsequence).

Cf. A000035, A048673, A246261, A246263.

Cf. also A270430.

Programs

Mathematica

f[n_] := (Times @@ Power[If[# == 1, 1, NextPrime@ #] & /@ First@ #, Last@ #] + 1)/2 &@ Transpose@ FactorInteger@ n; Select[Range@ 150, Xor[EvenQ@ f@ #, OddQ@ #] &] (* Michael De Vlieger, Mar 17 2016 *)