A182624 Primes in A182623.

7, 13, 29, 61, 101, 107, 199, 211, 229, 241, 419, 449, 467, 479, 769, 823, 829, 859, 991, 1009, 1021, 1571, 1601, 1637, 1667, 1697, 1733, 1811, 1847, 1877, 1901, 1907, 1931, 3079, 3109, 3229, 3271, 3307, 3331, 3457, 3499, 3529, 3541, 3547

Offset: 1

Author

Omar E. Pol, Nov 23 2010

Keywords

• nonn
• base

Links

• Nathaniel Johnston, Table of n, a(n) for n = 1..2000

Crossrefs

Cf. A000040, A182620, A182621, A182622, A182623.

Programs

Maple

lim:=1800: with(numtheory):A182624:={}:for n from 1 to lim do s:="": for d in divisors(n) do s:= cat(s,convert(convert(d, binary),string)): od: m:=convert(parse(s),decimal,binary):if(isprime(m))then A182624:=A182624 union {m};fi: od:
A182624:=sort(convert(A182624,list)):for n from 1 to nops(A182624) do if(A182624[n]>2*lim)then break:fi:printf("%d, ",A182624[n]):od: # Nathaniel Johnston, Apr 19 2011

Extensions

More terms from Vincenzo Librandi, Jan 30 2011

a(16) - a(44) from Nathaniel Johnston, Apr 19 2011