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.
%I A129122 #10 Aug 01 2025 14:47:35 %S A129122 3,38,60,62,75,107,119,132,156,164,188,213,245,300,332,357,381,389, %T A129122 413,426,438,470,483,485,507,542,564,566,623,651,708,710,732,767,789, %U A129122 791,804,836,848,861,885,893,917,942,974,1029,1061,1086,1110,1118,1142,1155 %N A129122 Numbers k such that A085068(3*k+1) = 7. %t A129122 f[n_] := Block[{c = 1, k = 4 n/3}, While[ ! IntegerQ[k], c++; k = 4*Ceiling[k]/3]; c]; Select[Range[2000], f[3*# + 1] == 7 &] (* _Stefan Steinerberger_, Aug 20 2007 *) %K A129122 nonn %O A129122 1,1 %A A129122 _Benoit Cloitre_, Aug 18 2007 %E A129122 More terms from _Stefan Steinerberger_, Aug 20 2007