A055984 a(n+1) = a(n) converted to base 10 from base 13.
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
Offset: 0
Links
- Vincenzo Librandi, Table of n, a(n) for n = 0..70
Programs
-
Mathematica
NestList[FromDigits[IntegerDigits[#],13]&,10,30] (* Vincenzo Librandi, Apr 06 2012 *)
-
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); print1(cuo,", "))} \\ Douglas Latimer, May 15 2012
Extensions
More terms from Douglas Latimer, May 15 2012