login
A339215
Primorial-base self numbers: numbers not of the form k + A276150(k).
9
1, 4, 11, 18, 25, 32, 35, 42, 49, 56, 63, 66, 73, 80, 87, 94, 97, 104, 111, 118, 125, 128, 135, 142, 149, 156, 159, 166, 173, 180, 187, 190, 197, 204, 229, 236, 243, 246, 253, 260, 267, 274, 277, 284, 291, 298, 305, 308, 315, 322, 329, 336, 339, 346, 353, 360
OFFSET
1,2
COMMENTS
Analogous to self numbers (A003052) using primorial base representation (A049345) instead of decimal expansion.
REFERENCES
József Sándor and Borislav Crstici, Handbook of Number theory II, Kluwer Academic Publishers, 2004, Chapter 4, pp. 384-386.
MATHEMATICA
max = 4; bases = Prime@Range[max, 1, -1]; m = Times @@ bases; s[n_] := n + Plus @@ IntegerDigits[n, MixedRadix[bases]]; Complement[Range[m], Array[s, m]]
KEYWORD
nonn,base
AUTHOR
Amiram Eldar, Nov 27 2020
STATUS
approved