A038209 Can express a(n) with the digits of a(n)^3 in order, only adding plus signs.

0, 1, 8, 10, 17, 18, 26, 27, 28, 45, 55, 62, 63, 71, 72, 81, 82, 89, 91, 99, 100, 107, 108, 109, 116, 125, 134, 136, 143, 144, 145, 153, 154, 161, 181, 188, 189, 197, 198, 199, 206, 207, 208, 215, 216, 224, 226, 233, 234, 235, 242, 243, 244, 253, 261, 262, 269

Offset

1,3

Comments

All terms == 0, 1 or 8 (mod 9). - Robert Israel, Sep 07 2020

Links

Robert Israel, Table of n, a(n) for n = 1..5500

Example

62^3 = 238328 and 23+8+3+28 = 62.

Maple

F:= proc(n, t) local d; option remember;
   if n = t then return true fi;
   if n < t then return false fi;
   for d from 1 to min(ilog10(t)+1, ilog10(n)+1) do
     if procname(floor(n/10^d), t - (n mod 10^d)) then return true fi
   od;
   false
end proc:
A:=select(t -> F(t^3, t), [$0..1000]); # Robert Israel, Sep 07 2020

Crossrefs

Sequence in context: A289687 A155966 A228072 * A319293 A061908 A056020

Adjacent sequences: A038206 A038207 A038208 * A038210 A038211 A038212

Keyword

nonn,base

Author

Erich Friedman

Extensions

Offset changed by Robert Israel, Sep 07 2020

Status

approved