Search: id:A006567
Results 1-1 of 1 results found.
%I A006567 M4887
%S A006567 13,17,31,37,71,73,79,97,107,113,149,157,167,179,199,311,337,347,359,
%T A006567 389,701,709,733,739,743,751,761,769,907,937,941,953,967,971,983,991,
%U A006567 1009,1021,1031,1033,1061,1069,1091,1097,1103,1109,1151,1153,1181,1193
%N A006567 Emirps (primes whose reversal is a different prime).
%D A006567 N. J. A. Sloane and Simon Plouffe, The Encyclopedia of Integer Sequences,
Academic Press, 1995 (includes this sequence).
%D A006567 M. Gardner, The Magic Numbers of Dr Matrix. Prometheus, Buffalo, NY,
1985, p. 230.
%H A006567 T. D. Noe, Table of n, a(n) for n=1..10000
%H A006567 Eric Weisstein's World of Mathematics, Link to a section of The World of Mathematics.
%H A006567 C. K. Caldwell, The Prime Glossary, emirp
%t A006567 f[n_] := ToExpression[StringReverse[ToString[n]]]; Select[ Range[ 1200
], PrimeQ[ f[ # ] ] && PrimeQ[ # ] && f[ # ] != # & ] - from Santi
Spadaro (spados(AT)katamail.com), Oct 14 2001
%t A006567 ndig[ a_, b_ ] := 10a + b tonum[ dig_ ] := Fold[ ndig, 0, dig ] f[ n_
] := tonum[ Reverse[ IntegerDigits[ n ] ] ] Select[ Range[ 1200 ],
PrimeQ[ f[ # ] ] && PrimeQ[ # ] && f[ # ] =!= # & ] - from Santi
Spadaro (spados(AT)katamail.com), Oct 14 2001
%o A006567 (MAGMA) [ n : n in [1..1194] | n ne rev and IsPrime(n) and IsPrime(rev)
where rev is Seqint(Reverse(Intseq(n))) ]; - from Sergei Haller (sergei(AT)sergei-haller.de),
Dec 21 2006
%Y A006567 Cf. A003684, A007628, A046732, A048051, A048052, A048053, A048054, A048895.
%Y A006567 A007500 = A002385 union this sequence.
%Y A006567 Sequence in context: A107159 A138375 A161401 this_sequence A108388 A083983
A129338
%Y A006567 Adjacent sequences: A006564 A006565 A006566 this_sequence A006568 A006569
A006570
%K A006567 nonn,nice,easy,base
%O A006567 1,1
%A A006567 N. J. A. Sloane (njas(AT)research.att.com).
%E A006567 More terms from James A. Sellers (sellersj(AT)math.psu.edu), Jan 22 2000
Search completed in 0.002 seconds