OFFSET
1,1
EXAMPLE
a(4)= 10032, in which the fourth digit is 3.
PROG
(PARI) dig(n, digno, base) = { local(nshif) ; nshif=n ; for(shifr=0, digno-1, nshif = floor(nshif/base) ; ) ; nshif % base ; } ndig(n, base) = { local(nshif, resul) ; nshif=n ; resul=1 ; while(nshif>0, nshif = floor(nshif/base) ; if( nshif>0, resul++, break) ; ) ; return(resul) ; } { for (n = 1, 23, anmin=10^(n-1) ; if ( ( n % 2 == 0 ) || (n %5 == 0), anmin *= 10) ; if ( ( n % 20 == 0 ) || (n %50 == 0), anmin *= 10) ; for( nex = anmin, anmin+10000000000000000000000, if ( ( nex % n) != 0, next ; ) ; nexd=ndig(nex, 10) ; if( dig(nex, nexd-n, 10)==3, print(nex, ", ") ; break ; ) ; ); ) } \\ R. J. Mathar, Mar 15 2006
CROSSREFS
KEYWORD
base,easy,nonn
AUTHOR
Amarnath Murthy, Nov 06 2005
EXTENSIONS
More terms from R. J. Mathar, Mar 15 2006
STATUS
approved