login
A168000
Numbers n with property that first digit of 6*n = last digit of n.
4
21, 31, 42, 53, 63, 74, 85, 95, 106, 116, 117, 127, 138, 148, 159, 171, 181, 191, 201, 211, 221, 231, 241, 251, 261, 271, 281, 291, 301, 311, 321, 331, 342, 352, 362, 372, 382, 392, 402, 412, 422, 432, 442, 452, 462, 472, 482, 492, 503, 513, 523, 533, 543
OFFSET
1,1
LINKS
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