OFFSET
1,1
LINKS
G. C. Greubel, Table of n, a(n) for n = 1..1000
EXAMPLE
6*21=126, 6*31=186, 6*42=252, 6*53=318, etc.
MATHEMATICA
Reap[Do[If[IntegerDigits[n][[ -1]]==IntegerDigits[6*n][[1]], Sow[n]], {n, 1000}]][[2, 1]]
Select[Range[600], Mod[#, 10]==First[IntegerDigits[6#]]&] (* Harvey P. Dale, Jan 09 2014 *)
CROSSREFS
KEYWORD
base,nonn
AUTHOR
Zak Seidov, Nov 16 2009
STATUS
approved