OFFSET
1,2
COMMENTS
From Robert Israel, Feb 26 2019: (Start)
If A002275(n) is not in the sequence, then there are no terms of length n.
3*A002275(n) and 6*A002275(n) are in the sequence if and only if A002275(n) is in the sequence and n is not divisible by 3.
LINKS
Robert Israel, Table of n, a(n) for n = 1..326
EXAMPLE
66 and 6666 are members but 666 is not.
MAPLE
g:= proc(n) local r;
r:= (10^n-1)/9;
if not numtheory:-issqrfree(r) then NULL
elif n mod 6 = 0 then r, 2*r, 5*r
elif n mod 3 = 0 then r, 2*r, 5*r, 7*r
else r, 2*r, 3*r, 5*r, 6*r, 7*r
fi
end proc:
seq(g(n), n=1..10); # Robert Israel, Feb 26 2019
PROG
(PARI) is(n) = n>0 && vecmin(digits(n))==vecmax(digits(n)) && issquarefree(n) \\ Felix Fröhlich, Feb 26 2019
CROSSREFS
KEYWORD
base,easy,nonn
AUTHOR
Amarnath Murthy, Nov 11 2002
EXTENSIONS
Corrected and extended by Ray Chandler, Aug 12 2003
Offset changed by Robert Israel, Feb 26 2019
STATUS
approved