login
A050746
Numbers k such that the decimal expansion of k^7 contains no pair of consecutive equal digits.
2
0, 1, 2, 3, 4, 5, 7, 8, 9, 11, 12, 13, 14, 15, 16, 19, 24, 25, 26, 27, 28, 29, 32, 36, 46, 52, 56, 57, 61, 62, 63, 71, 74, 79, 82, 83, 91, 101, 107, 111, 125, 132, 135, 136, 147, 149, 152, 153, 154, 159, 161, 163, 171, 173, 175, 194, 204, 207, 211, 212, 221, 225, 227
OFFSET
1,3
LINKS
MAPLE
filter:= proc(n) local L;
L:= convert(n^7, base, 10);
not member(0, L[1..-2]-L[2..-1])
end proc:
select(filter, [$0..1000]); # Robert Israel, Jun 23 2019
CROSSREFS
Cf. A050754.
Sequence in context: A039263 A344881 A039203 * A039117 A185024 A359913
KEYWORD
nonn,base
AUTHOR
Patrick De Geest, Sep 15 1999
STATUS
approved