OFFSET
1,1
COMMENTS
All the terms end with 6 (A017341).
LINKS
Stefano Spezia, Table of n, a(n) for n = 1..10000
FORMULA
Conjecture: Lim_{n->infinity} a(n)/a(n-1) = 1.
The conjecture is true since it can be proved that a(n) = (sqrt(a(n-1)) + g(n-1))^2 where [g(n): n > 1] is a bounded sequence of positive real numbers. - Stefano Spezia, Aug 18 2021
EXAMPLE
36 = 6*6, 96 = 6*16, 216 = 6*36, 256 = 16*16, 276 = 6*46, ...
MATHEMATICA
a={}; For[n=0, n<=250, n++, For[k=0, k<=n, k++, If[Mod[10*n+6, 10*k+6]==0 && Mod[(10*n+6)/(10*k+6), 10]==6 && 10*n+6>Max[a], AppendTo[a, 10*n+6]]]]; a
PROG
(PARI) isok6(n) = (n%10) == 6; \\ A017341
isok(n) = {if (isok6(n), my(d=divisors(n)); fordiv(n, d, if (isok6(d) && isok6(n/d), return(1))); ); return (0); } \\ Michel Marcus, Apr 14 2019
(Python)
def aupto(lim): return sorted(set(a*b for a in range(6, lim//6+1, 10) for b in range(a, lim//a+1, 10)))
print(aupto(2117)) # Michael S. Branicky, Aug 18 2021
CROSSREFS
KEYWORD
nonn,base
AUTHOR
Stefano Spezia, Mar 16 2019
STATUS
approved