A208262 - OEIS

%I #9 Nov 21 2013 13:07:47

%S 1,11,101,121,131,151,181,191,1021,1031,1051,1061,1091,1111,1151,1171,

%T 1181,1201,1231,1291,1301,1321,1331,1361,1381,1441,1451,1471,1481,

%U 1511,1531,1571,1601,1621,1661,1721,1741,1801,1811,1831,1861,1871,1901,1931,1951,1991

%N Numbers with all divisors starting and ending with digit 1.

%C Union of A062332 and A208261. Subsequence of A208259 (numbers starting and ending with digit 1).

%e Divisors of 1111: 1, 11, 101, 1111.

%t Select[Table[n, {n, 2000}], Union[First /@ IntegerDigits[Divisors[#]]] == {1} && Union[Last /@ IntegerDigits[Divisors[#]]] == {1} &] (* _Vladimir Joseph Stephan Orlovsky_, Feb 26 2012 *)

%Y Cf. A062332 (primes starting and ending with digit 1), A208261 (nonprime numbers with all divisors starting and ending with digit 1).

%K nonn,base

%O 1,2

%A _Jaroslav Krizek_, Feb 24 2012