Search: id:A077652 Results 1-1 of 1 results found. %I A077652 %S A077652 2,3,5,7,11,101,131,151,181,191,313,353,373,383,727,757,787,797,919, %T A077652 929,1021,1031,1051,1061,1091,1151,1171,1181,1201,1231,1291,1301,1321, %U A077652 1361,1381,1451,1471,1481,1511,1531,1571,1601,1621,1721,1741,1801,1811 %N A077652 Not necessarily palindromic primes of which initial and terminal decimal digits are identical. %t A077652 Do[s1=First[IntegerDigits[Prime[n]]]; s2=Last[IntegerDigits[Prime[n]]]; If[Equal[s1, s2], Print[Prime[n]]], {n, 1, 1000}] %Y A077652 Cf. A000030, A000040. %Y A077652 Sequence in context: A083393 A052480 A083137 this_sequence A002385 A069217 A083139 %Y A077652 Adjacent sequences: A077649 A077650 A077651 this_sequence A077653 A077654 A077655 %K A077652 base,nonn %O A077652 1,1 %A A077652 Labos E. (labos(AT)ana.sote.hu), Nov 19 2002 Search completed in 0.002 seconds