A341060 -id:A341060 - cp's OEIS frontend

A341061 Numbers k such that A340179(k) is prime.

5, 28, 44, 51, 58, 61, 63, 90, 93, 108, 129, 136, 145, 148, 186, 208, 234, 235, 241, 247, 262, 272, 277, 278, 300, 306, 310, 314, 316, 321, 329, 335, 379, 384, 386, 414, 428, 446, 448, 449, 475, 480, 492, 514, 535, 537, 546, 548, 572, 580, 599, 609, 611, 616, 618, 626, 660, 670, 673, 680, 683

Offset: 1

J. M. Bergot and Robert Israel, Feb 04 2021

nonn

			a(3) = 44 is a term because A340179(44) = 211 is prime.

Robert Israel, Table of n, a(n) for n = 1..3000

Cf. A340179, A341059, A341060.

f:= proc(n) local C, s, c;
  C:=select(t -> igcd(t, n) = 1, [$1..n-1]);
  s:= convert(C, `+`);
  add(s mod c, c = C)
end proc:
select(t -> isprime(f(t)), [$1..1000]);

A341059 Numbers k such that A340179(k) is a square.

Original entry on oeis.org

1, 2, 3, 4, 6, 8, 11, 12, 15, 17, 27, 48, 92, 6219, 24310

Offset: 1

J. M. Bergot and Robert Israel, Feb 04 2021

			a(6) = 8 is a term because A340179(8) = 4 = 2^2.

Cf. A340179, A341060, A341061.

f:= proc(n) local C, s, c;
  C:=select(t -> igcd(t, n) = 1, [$1..n-1]);
  s:= convert(C, `+`);
  add(s mod c, c = C)
end proc:
select(t -> issqr(f(t)), [$1..7000]);

cp's OEIS Frontend

A341061 Numbers k such that A340179(k) is prime.

Views

Author

Keywords

Examples

Links

Crossrefs

Programs

Maple