|
|
A055984
|
|
a(n+1) = a(n) converted to base 10 from base 13.
|
|
3
|
|
|
10, 13, 16, 19, 22, 28, 34, 43, 55, 70, 91, 118, 190, 286, 448, 736, 1228, 2569, 5326, 11524, 31633, 88936, 247630, 873262, 3177280, 15067468, 87070069, 535975813, 4294587118, 44635603345, 598960963723, 10294085980207, 307743101497111, 11988344945494321
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
0,1
|
|
LINKS
|
|
|
MATHEMATICA
|
NestList[FromDigits[IntegerDigits[#], 13]&, 10, 30] (* Vincenzo Librandi, Apr 06 2012 *)
|
|
PROG
|
(PARI) {cuo=10; print1(cuo, ", ");
for(i=1, 34, cvst=cuo; cuo=0; twh=-1;
while(cvst!=0, twh++;
ptch=cvst%10; cuo=cuo+ptch*13^twh; cvst=(cvst-ptch)/10);
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn,base,easy
|
|
AUTHOR
|
|
|
EXTENSIONS
|
|
|
STATUS
|
approved
|
|
|
|