A337184 Numbers divisible by their first digit and their last digit.
1, 2, 3, 4, 5, 6, 7, 8, 9, 11, 12, 15, 22, 24, 33, 36, 44, 48, 55, 66, 77, 88, 99, 101, 102, 104, 105, 111, 112, 115, 121, 122, 123, 124, 125, 126, 128, 131, 132, 135, 141, 142, 144, 145, 147, 151, 152, 153, 155, 156, 161, 162, 164, 165, 168, 171, 172, 175, 181, 182
Offset: 1
Links
- David A. Corneth, Table of n, a(n) for n = 1..10000
- Index entries for 10-automatic sequences.
Crossrefs
Programs
-
Mathematica
Select[Range[175], Mod[#, 10] > 0 && And @@ Divisible[#, IntegerDigits[#][[{1, -1}]]] &] (* Amiram Eldar, Jan 29 2021 *)
-
PARI
is(n) = n%10>0 && n%(n%10)==0 && n % (n\10^logint(n,10)) == 0 \\ David A. Corneth, Jan 29 2021
-
Python
def ok(n): s = str(n); return s[-1] != '0' and n%int(s[0])+n%int(s[-1]) == 0 print([m for m in range(180) if ok(m)]) # Michael S. Branicky, Jan 29 2021
Formula
(10n-9)/9 <= a(n) < 45n. (I believe the liminf of a(n)/n is 3.18... and the limsup is 6.18....) - Charles R Greathouse IV, Nov 26 2024
Conjecture: 3n < a(n) < 7n for n > 75. - Charles R Greathouse IV, Dec 02 2024
Comments