cp's OEIS Frontend

This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.

A290016 Brazilian numbers which have exactly three Brazilian representations.

This page as a plain text file.
%I A290016 #18 Jul 24 2020 07:12:49
%S A290016 24,36,42,54,66,70,78,88,100,102,104,105,124,128,130,135,136,138,152,
%T A290016 154,165,171,172,174,182,184,186,189,190,195,196,225,230,231,232,238,
%U A290016 242,246,248,250,256,258,272,282,286,290,292,296,297,310,318,322,328,333,344,345
%N A290016 Brazilian numbers which have exactly three Brazilian representations.
%C A290016 These numbers could be called 3-Brazilian numbers.
%C A290016 All these numbers are composite with six to ten different divisors.
%C A290016 The smallest number of this sequence is 24 with 24 = 44_5 = 33_7 = 22_11. The number 24 is highly Brazilian in A329383.
%e A290016 36 = 4 * 9 = 44_8 = 3 * 12 = 33_11 = 2 * 18 = 22_19.
%e A290016 42 = 2 * 21 = 22_20 = 222_4 = 3 * 14 = 33_13.
%e A290016 124 = 4 * 31 = 44_30 = 444_5 = 2 * 62 = 22_61.
%e A290016 272 = 8 * 34 = 88_33 = 4 * 68 = 44_67 = 2 * 136 = 22_135.
%t A290016 Flatten@ Position[#, 3] &@ Table[Count[Range[2, n - 2], _?(And[Length@ # != 1, Length@ Union@ # == 1] &@ IntegerDigits[n, #] &)], {n, 350}] (* _Michael De Vlieger_, Jul 30 2017 *)
%Y A290016 Cf. A125134, A220570, A220571, A257521, A288783, A290015, A290017, A290018, A329383.
%K A290016 nonn
%O A290016 1,1
%A A290016 _Bernard Schott_, Jul 27 2017