OFFSET
1,2
COMMENTS
a(1) = 1 as the number itself is to be included. a(p) = p if p is a prime (by definition).
LINKS
Andrew Howroyd, Table of n, a(n) for n = 1..100
EXAMPLE
a(6) = 2346, as 2,3,4,6 are not coprime to 6 and 1 and 5 are coprime to 6.
PROG
(PARI) a(n)={if(n==1, 1, fromdigits(concat([digits(k) | k<-[1..n], gcd(k, n)>1])))} \\ Andrew Howroyd, Nov 09 2019
CROSSREFS
KEYWORD
nonn,base
AUTHOR
Amarnath Murthy, Apr 19 2001
EXTENSIONS
Offset corrected and terms a(14) and beyond from Andrew Howroyd, Nov 09 2019
STATUS
approved