OFFSET
1,1
PROG
(PARI) a(n) = {my(c=vector(n), d=0, v=w=[4]); forcomposite(i=4, 4*n, c[d++]=i; if(d==n, break)); for(i=2, n, v=concat(v, d=digits(c[i])); w=concat(d, w)); fromdigits(vector(2*#v, i, if(i%2, v[1+i\2], w[i/2])))/22; } \\ Jinyuan Wang, May 17 2020
CROSSREFS
KEYWORD
nonn,base
AUTHOR
Amarnath Murthy, Nov 25 2002
EXTENSIONS
More terms from Jinyuan Wang, May 17 2020
STATUS
approved