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 A276335 #9 Aug 31 2016 20:56:18 %S A276335 0,0,0,0,0,1,2,3,0,1,2,3,0,1,2,3,0,1,0,1,2,3,4,5,6,7,8,9,10,11,12,13, %T A276335 14,15,16,17,0,1,2,3,4,5,6,7,8,9,10,11,12,13,14,15,16,17,0,1,2,3,4,5, %U A276335 6,7,8,9,10,11,12,13,14,15,16,17,0,1,2,3,4,5,6,7,8,9,10,11,12,13,14,15,16,17,0,1,2,3,4,5,0 %N A276335 Discard the most significant digit when n is expressed in greedy A001563-base (A276326), then convert back to decimal: a(n) = n - A276334(n). %H A276335 Antti Karttunen, <a href="/A276335/b276335.txt">Table of n, a(n) for n = 0..4320</a> %F A276335 a(n) = n - A276334(n). %t A276335 {0}~Join~Table[n - # Floor[n/#] &@(# #!) &@ NestWhile[# + 1 &, 0, # #! <= n &[# + 1] &], {n, 96}] (* _Michael De Vlieger_, Aug 31 2016 *) %o A276335 (Scheme) (define (A276335 n) (- n (A276334 n))) %Y A276335 Cf. A001563, A276326, A276328, A276334, A276331, A276337. %Y A276335 Cf. also A257687. %K A276335 nonn,base %O A276335 0,7 %A A276335 _Antti Karttunen_, Aug 30 2016