[go: up one dir, main page]

login
A077311
a(n) = A077310(n)/n.
3
2, 17, 15, 14, 135782, 13, 1272873030448788, 1137639, 112346812683513, 1112131415161718192, 1102855923792562911, 109512634765160, 1088585937070785555634040482525331010179495
OFFSET
1,1
MAPLE
A055642 := proc(n) floor(log[10](n))+1 ; end : icat := proc(istrt, iend) local resul, i ; resul := istrt ; for i from istrt+1 to iend do resul := 10^A055642(i)*resul+i ; od ; RETURN(resul) ; end: A077310 := proc(n) local istrt, iend ; istrt := n+1 ; iend := n+1 ; while icat(istrt, iend) mod n <> 0 do iend := iend+1 ; od ; RETURN( icat(istrt, iend)) : end: A077311 := proc(n) A077310(n)/n ; end: for n from 1 to 20 do printf("%d, ", A077311(n)) ; od ; # R. J. Mathar, Apr 01 2007
CROSSREFS
Sequence in context: A257466 A226291 A359437 * A196732 A346391 A153652
KEYWORD
base,nonn
AUTHOR
Amarnath Murthy, Nov 03 2002
EXTENSIONS
More terms from R. J. Mathar, Apr 01 2007
STATUS
approved