A182624 - OEIS

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

(list; graph; refs; listen; history; text; internal format)

OFFSET

1,1

LINKS

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

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

CROSSREFS

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

Sequence in context: A045463 A082221 A230460 * A096333 A133325 A336117

Adjacent sequences: A182621 A182622 A182623 * A182625 A182626 A182627

KEYWORD

nonn,base

AUTHOR

Omar E. Pol, Nov 23 2010

EXTENSIONS

More terms from Vincenzo Librandi, Jan 30 2011

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

STATUS

approved