A330563 Primes in A330562.

101, 103, 109, 401, 601, 701, 1009, 1021, 1033, 1051, 1063, 1201, 1303, 1801, 2011, 2017, 2081, 2801, 3001, 3061, 3301, 4001, 4021, 4201, 4801, 5011, 5021, 5051, 5081, 5101, 5501, 5801, 6301

Offset

1,1

Links

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

Maple

filter:= proc(k) local L;
  L:= convert(convert(k, base, 10), set);
  andmap(d -> member(k mod d, L), L minus {0}) and isprime(k)
end proc:
select(filter, [seq(i, i=101..10000, 2)]); # Robert Israel, Dec 23 2024

Crossrefs

Cf. A330562.

Sequence in context: A318157 A117837 A176929 * A060400 A128717 A111348

Adjacent sequences: A330560 A330561 A330562 * A330564 A330565 A330566

Keyword

nonn,base

Author

James R. Buddenhagen, Dec 31 2019

Status

approved