A158237 -id:A158237 - cp's OEIS frontend

A158235 Numbers n whose square can be represented as a repdigit number in some base less than n.

11, 20, 39, 40, 49, 78, 133, 247, 494, 543, 1086, 1218, 1629, 1651, 1729, 2172, 2289, 2715, 3097, 3258, 3458, 3801, 4171, 4344, 4503, 4578, 4887, 5187, 5430, 6194, 6231, 6867, 6916, 7303, 7540, 7563, 8342, 8645, 8773, 9139, 9156, 9291, 10374, 12103

Offset: 1

T. D. Noe, Mar 14 2009

Alternatively, numbers n such that n^2 = d*(b^k-1)/(b-1) for some b, d, and k with d < b < n. See Inkeri link.
It appears that 11^2 and 20^2 are the only squares representable as repunits having more than two "digits" in some base (see A208242).
Some bases, such as 313, appear many times. Why? See A158236 for the bases and A158237 for the repdigit.
Can a square have more than one representation? The representations of 11^2, 20^2, 40^2, and 1218^2 have more than 3 "digits". Is the list of such numbers finite?
A generalization of this problem, to "determine all perfect powers with identical digits in some basis", is briefly mentioned on page 6 of Waldschmidt's paper. - T. D. Noe, Mar 30 2009
From Bernard Schott, Aug 25 2017: (Start)
Some bases, such as 313, appear 10 times; others, such as 653, appear 9 times.
The reason is that for these bases b, we have 111_b = a * c^2 with a/b ~ 1/100. So for k such that 1 <= k <= floor(b/a)^(1/2), we can write: (a*k^2, a*k^2, a*k^2)_b = (k*a*c)^2. For instance,
111_313 = 3*181^2 and (3*k^2, 3*k^2, 3*k^2)_313 = (3*k*181)^2 = (543*k)^2, for k = 1 to 10.
111_653 = 7*247^2 and (7*k^2, 7*k^2, 7*k^2)_653 = (7*k*247)^2 = (1729*k)^2, for k = 1 to 9. (End)
Each term of this sequence except 11 has a square which can also be represented as a repdigit in some base greater than n, so they are also Brazilian repdigits with only two digits. - Bernard Schott, Aug 25 2017

			11^2 = 11111 in base 3.
20^2 = 1111 in base 7.
39^2 = 333 in base 22.
40^2 = 4444 in base 7.
49^2 = 777 in base 18.
78^2 = (12)(12)(12) in base 22.
1218^2 = (21)(21)(21)(21) in base 41.

Michael De Vlieger and Michel Marcus, Table of n, a(n) for n = 1..100 (first 75 terms from Michel Marcus).
K. Inkeri, On the diophantine equation a * (x^n - 1) / (x-1) = y^m, Acta Arithmetica, XXI (1972).
Michel Waldschmidt, Open Diophantine problems, arXiv:math/0312440 [math.NT], 2003-2004.
Michael De Vlieger, Table of Values of OEIS A158235(n), A158236(n), and A158237(n) for 1 <= n <= 100.

Cf. A158245 (primitive terms), A158912 (four-digit repdigit numbers).

Cf. A158236 (the bases), A158237 (the repdigit).

Do[sq = n^2; Do[If[Length[Union[IntegerDigits[sq, b]]] == 1, Print[{n, sq, b, IntegerDigits[sq, b]}]], {b, 2, n}], {n, 10000}]

isok(n) = {for (b=2, n-1, if (#Set(digits(n^2, b)) == 1, return (1));); return (0);} \\ Michel Marcus, Sep 06 2017

Inequality edited by T. D. Noe, Mar 30 2009

A158236 The base for the numbers in A158235.

Original entry on oeis.org

3, 7, 22, 7, 18, 22, 30, 68, 68, 313, 313, 41, 313, 146, 653, 313, 499, 313, 710, 313, 653, 313, 423, 313, 292, 499, 313, 653, 313, 710, 439, 499, 653, 699, 99, 4366, 423, 653, 521, 581, 499, 710, 653, 653, 710, 4701, 653, 699, 4366, 710, 653, 4611, 787, 2272

Offset: 1

T. D. Noe, Mar 14 2009

nonn

The prime 313 appears 10 times. Which numbers are allowed as bases?

			From _Michael De Vlieger_, Sep 08 2017: (Start)
Bases that appear, for numbers 2 <= m <= 101000 in A158235, i.e., for 1 <= n <= 100. f = frequency of b in a(n) for m in the range shown above:
Base b   f  Prime factors of b
------------------------------
     3   1  3
     7   2  7
    18   1  2, 3, 3
    22   2  2, 11
    30   1  2, 3, 5
    41   1  41
    68   2  2, 2, 17
    99   1  3, 3, 11
   146   1  2, 73
   239   2  239
   292   1  2, 2, 73
   313  10  313
   423   2  3, 3, 47
   439   1  439
   499   4  499
   521   1  521
   581   1  7, 83
   653   9  653
   699   2  3, 233
   710   6  2, 5, 71
   787   1  787
  1047   1  3, 349
  1353   1  3, 11, 41
  1425   1  3, 5, 5, 19
  1660   1  2, 2, 5, 83
  1714   1  2, 857
  2060   1  2, 2, 5, 103
  2174   1  2, 1087
  2198   1  2, 7, 157
  2272   5  2, 2, 2, 2, 2, 71
  2819   4  2819
  3019   1  3019
  4366  13  2, 37, 59
  4526   2  2, 31, 73
  4611   6  3, 29, 53
  4701   8  3, 1567
  6205   1  5, 17, 73
(End)

Michael De Vlieger and Michel Marcus, Table of n, a(n) for n = 1..100 (first 75 terms from Michel Marcus).

Cf. A158235, A158237.

Mathematica
```
(* See A158235. *)
```

cp's OEIS Frontend

A158235 Numbers n whose square can be represented as a repdigit number in some base less than n.

Views

Author

Keywords

Comments

Examples

Links

Crossrefs

Programs

Mathematica

PARI

Extensions