A075007 a(n) = floor(concatenation of n+5, n+4, n+3, n+2, n+1 and n divided by 6).
90535, 109053, 127572, 146090, 164609, 183127, 1851646, 20185164, 218685183, 2355201851, 25235520185, 26919021868, 28602523552, 30286025235, 31969526919, 33653028602, 35336530286, 37020031969, 38703533653, 40387035336
Offset: 0
Links
- Robert Israel, Table of n, a(n) for n = 0..10000
Programs
-
Maple
f:= proc(n) local i; floor(parse(cat(seq(i,i=n+5 .. n, -1)))/6) end proc: map(f, [$0..40]); # Robert Israel, Jan 11 2024
-
Mathematica
fc[n_]:=Module[{c=Reverse[n]},Floor[FromDigits[Flatten[IntegerDigits/@ c]]/ 6]]; fc/@Partition[Range[0,30],6,1] (* Harvey P. Dale, Nov 09 2014 *)
Extensions
More terms from Antonio G. Astudillo (afg_astudillo(AT)lycos.com), Apr 18 2003