OFFSET
1,1
LINKS
G. C. Greubel, Table of n, a(n) for n = 1..1000
FORMULA
A000030(A008585(a(n))) = A010879(a(n)). (Defining property of the terms of this sequence.) - M. F. Hasler, Apr 22 2024
EXAMPLE
3*13=39, 3*14=42, 3*28=84, 3*41=123, etc.
MATHEMATICA
Reap[Do[If[IntegerDigits[n][[ -1]]==IntegerDigits[3*n][[1]], Sow[n]], {n, 1000}]][[2, 1]]
Select[Range[600], Last[IntegerDigits[#]]==First[IntegerDigits[3#]]&] (* Harvey P. Dale, Jul 10 2013 *)
PROG
(PARI) select( {is_A167996(n)=n*3\10^logint(3*n+!n, 10)==n%10}, [1..666]) \\ M. F. Hasler, Apr 22 2024
(Python) is_A167996 = lambda x: int(str(3*x)[0]) == x % 10 # M. F. Hasler, Apr 22 2024
CROSSREFS
KEYWORD
base,nonn
AUTHOR
Zak Seidov, Nov 16 2009
STATUS
approved