A342715 Frobenius number of the lower Wythoff sequence (A000201), starting with the n-th term.
5, 7, 13, 15, 15, 20, 23, 26, 31, 31, 39, 41, 41, 47, 49, 52, 57, 57, 62, 65, 68, 73, 75, 81, 83, 83, 89, 91, 94, 99, 99, 107, 109, 109, 115, 117, 123, 125, 125, 130, 133, 136, 141, 143, 149, 151, 151, 157, 159, 162, 167, 167, 172, 175, 178, 183, 185, 191, 193
Offset: 2
Keywords
Links
- Jeffrey Shallit, Frobenius numbers and automatic sequences, arXiv:2103.10904 [math.NT], 2021.
Programs
-
Mathematica
With[{s = Array[Floor[#*GoldenRatio] &, 120]}, Array[FrobeniusNumber[s[[# ;; -1]]] &, Floor[Length[s]/2]]] (* Michael De Vlieger, Jun 02 2021 *)
Comments