|
| |
|
|
A125134
|
|
"Brazilian" numbers ("les nombres brésiliens" in French): numbers n such that there is a natural number b with 1 < b < n-1 such that the representation of n in base b has all equal digits.
|
|
10
| |
|
|
7, 8, 10, 12, 13, 14, 15, 16, 18, 20, 21, 22, 24, 26, 27, 28, 30, 31, 32, 33, 34, 35, 36, 38, 39, 40, 42, 43, 44, 45, 46, 48, 50, 51, 52, 54, 55, 56, 57, 58, 60, 62, 63, 64, 65, 66, 68, 69, 70, 72, 73, 74, 75, 76, 77, 78, 80, 81, 82, 84, 85, 86, 87, 88, 90
(list; graph; refs; listen; history; internal format)
|
|
|
|
OFFSET
| 1,1
|
|
|
REFERENCES
| Pierre Bornsztein, "Hypermath", Vuibert, Exercise a35, p. 7.
Iberoamerican Olympiads, 1994.
|
|
|
LINKS
| Nathaniel Johnston, Table of n, a(n) for n = 1..4000
Bernard SCHOTT and others, Postings to the French mathematical forum les-mathematiques.net
Bernard Schott, Les nombres brésiliens, Quadrature, no. 76, avril-juin 2010, pages 30-38.
Bernard Schott, Les nombres brésiliens, Reprinted from Quadrature, no. 76, avril-juin 2010, pages 30-38, included here with permission from the editors of Quadrature.
|
|
|
EXAMPLE
| 15 is a member since it is 33 in base 4.
|
|
|
MAPLE
| isA125134 := proc(n) local k: for k from 2 to n-2 do if(nops(convert(convert(n, base, k), set))=1)then return true: fi: od: return false: end: A125134 := proc(n) option remember: local k: if(n=1)then return 7: fi: for k from procname(n-1)+1 do if(isA125134(k))then return k: fi: od: end: seq(A125134(n), n=1..65); # Nathaniel Johnston, May 24 2011
|
|
|
CROSSREFS
| Cf. A190300.
Sequence in context: A093678 A188052 A037263 * A169876 A120175 A175222
Adjacent sequences: A125131 A125132 A125133 * A125135 A125136 A125137
|
|
|
KEYWORD
| nonn,base
|
|
|
AUTHOR
| Bernard SCHOTT (bernardschott(AT)wanadoo.fr), Jan 21 2007
|
|
|
EXTENSIONS
| More terms from Nathaniel Johnston (nathaniel(AT)nathanieljohnston.com), May 24 2011
|
| |
|
|
