close
login
A382174
Numbers k such that A382173(k) >= k.
4
5, 6, 10, 14, 25, 30, 50, 125, 150, 250, 625, 750, 1250, 3125, 3750, 6250, 15625, 18750, 31250, 78125
OFFSET
1,1
COMMENTS
A382173(k) = k for k = 14 and for no other number below 80000.
EXAMPLE
n | a(n) | A382173(a(n))
--+------+---------------
1 | 5 | 6
2 | 6 | 7
3 | 10 | 16
4 | 14 | 14
5 | 25 | 26
6 | 30 | 31
7 | 50 | 80
8 | 125 | 134
9 | 150 | 161
10 | 250 | 412
MATHEMATICA
q[k_] := Total[RealDigits[1/k, GoldenRatio, A001175[k], -1][[1]]] >= k; Select[Range[1000], q] (* using A001175[n] from A001175 *)
CROSSREFS
KEYWORD
nonn,base,more
AUTHOR
Amiram Eldar, Mar 17 2025
STATUS
approved