OFFSET
0,1
MATHEMATICA
Floor[#/7]&/@(FromDigits[Flatten[IntegerDigits/@#]]&/@Partition[Range[0, 25], 7, 1]) (* Harvey P. Dale, Feb 03 2011 *)
CROSSREFS
KEYWORD
base,easy,nonn
AUTHOR
Amarnath Murthy, Aug 31 2002
EXTENSIONS
More terms from Antonio G. Astudillo (afg_astudillo(AT)lycos.com), Mar 23 2003
STATUS
approved