login
A075007
a(n) = floor(concatenation of n+5, n+4, n+3, n+2, n+1 and n divided by 6).
2
90535, 109053, 127572, 146090, 164609, 183127, 1851646, 20185164, 218685183, 2355201851, 25235520185, 26919021868, 28602523552, 30286025235, 31969526919, 33653028602, 35336530286, 37020031969, 38703533653, 40387035336
OFFSET
0,1
LINKS
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 *)
CROSSREFS
KEYWORD
base,nonn
AUTHOR
Amarnath Murthy, Sep 01 2002
EXTENSIONS
More terms from Antonio G. Astudillo (afg_astudillo(AT)lycos.com), Apr 18 2003
STATUS
approved