login
Numbers n such that the products of the decimal digits of n^2 and n^3 coincide, n^2 and n^3 are zeroless.
2

%I #12 May 14 2015 17:34:56

%S 1,5,7,6057,292839,1295314,4897814,4967471,5097886,6010324,6919146,

%T 7068165,7189558,9465077,15347958,22842108,24463917,26754863,43378366,

%U 48810128,48885128,50833026,54588458,54649688,68093171,69925865,69980346,73390374,74357144

%N Numbers n such that the products of the decimal digits of n^2 and n^3 coincide, n^2 and n^3 are zeroless.

%C This sequence is more sporadic than A257760. It appears there is no sequence for zeroless numbers n and n^3 such that the products of the decimal digits coincide, except for the trivial 1.

%H Giovanni Resta, <a href="/A257774/b257774.txt">Table of n, a(n) for n = 1..544</a> (terms < 4*10^10)

%e 5 is in the sequence since 5^2 = 25 and 5^3 = 125 and we have 2*5 = 1*2*5 = 10 > 0.

%e 6057 is in the sequence since 6057^2 = 36687249 and 6057^3 = 222214667193 and we have 3*6*6*8*7*2*4*9 = 2*2*2*2*1*4*6*6*7*1*9*3 = 435456 > 0.

%t pod[n_] := Times@@IntegerDigits@n; Select[Range[10^7], pod[#^3] == pod[#^2] > 0 &] (* _Giovanni Resta_, May 08 2015 *)

%Y Cf. A000290, A000578, A029793, A052382, A257760, A257763.

%K nonn,base

%O 1,2

%A _Pieter Post_, May 08 2015

%E Corrected and extended by _Giovanni Resta_, May 08 2015