login

Year-end appeal: Please make a donation to the OEIS Foundation to support ongoing development and maintenance of the OEIS. We are now in our 61st year, we have over 378,000 sequences, and we’ve reached 11,000 citations (which often say “discovered thanks to the OEIS”).

A061460
Cubes which produce cubes when the leading digit is moved to the end.
2
1, 8, 512, 1000, 8000, 1000000, 8000000, 95443993, 1000000000, 8000000000, 1000000000000, 8000000000000, 1000000000000000, 8000000000000000, 1000000000000000000, 8000000000000000000, 1000000000000000000000, 8000000000000000000000, 1000000000000000000000000
OFFSET
1,2
EXAMPLE
512 becomes 125 which is also a cube.
MAPLE
filter:= proc(n) local d, x, y;
d:= ilog10(n);
x:= floor(n/10^d);
y:= n mod 10^d;
type(surd(10*y+x, 3), integer);
end proc:
select(filter, [seq(i^3, i=1..10^5)]); # Robert Israel, Aug 05 2020
CROSSREFS
Cf. A061459 (with squares instead of cubes).
Sequence in context: A228292 A082385 A236077 * A016935 A241756 A236220
KEYWORD
nonn,base
AUTHOR
Amarnath Murthy, May 04 2001
EXTENSIONS
More terms from Erich Friedman, May 08 2001
Further terms from Larry Reeves (larryr(AT)acm.org), May 25 2001
More terms from Sean A. Irvine, Feb 17 2023
STATUS
approved