

A225795


Smallest k > 1 such that k^n has k as its middle digits, or 0 if no such k exists.


0



2, 50, 50, 60, 70, 6, 2, 7600, 47, 5, 4, 93, 6, 34, 5, 9600, 71, 4, 74, 320, 3, 372, 13, 846, 32, 9600, 339, 9765, 202, 3, 69, 6, 9900, 13, 8586, 9600, 4, 46, 3, 4, 446, 3, 9900, 4, 1256, 614, 819, 3365, 8, 36400, 76, 647, 35, 39548, 9900, 4740
(list;
graph;
refs;
listen;
history;
text;
internal format)



OFFSET

1,1


COMMENTS

Is a(88) the first 0? If a(88) is nonzero, it is greater than 2 * 10^8.  T. D. Noe, Jul 29 2013


LINKS

Table of n, a(n) for n=1..56.


EXAMPLE

a(6) = 6 because 6^6 = 46656 has 6 as its middle digit.


MATHEMATICA

Table[k = 2; While[c0 = IntegerDigits[k]; c1 = IntegerDigits[k^n]; len0 = Length[c0]; len1 = Length[c1]; f = (len1  len0)/2; ! (OddQ[len0] == OddQ[len1] && c0 == Take[c1, {f + 1, f + len0}]), k++]; k, {n, 56}] (* T. D. Noe, Jul 29 2013 *)


CROSSREFS

Cf. A062118.
Sequence in context: A088067 A145676 A291188 * A027619 A076267 A050800
Adjacent sequences: A225792 A225793 A225794 * A225796 A225797 A225798


KEYWORD

nonn,base


AUTHOR

Michel Lagneau, Jul 27 2013


EXTENSIONS

Corrected by T. D. Noe, Jul 29 2013


STATUS

approved



