A090558 Duplicate of A068704.
11, 421, 31, 41, 2551, 61, 71, 6481, 8191, 101
Offset: 1
This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.
a:= proc(n) option remember; `if`(n=0, 1, parse(cat(11^n, a(n-1)))) end: seq(a(n), n=0..10); # Alois P. Heinz, May 24 2014
A(14)=11419627441; 14^0=1; 14^1=14; 14^2=196; 14^3=2744; 11419627441 is prime. A(19)=11936168591; 19^0=1; 19^1=19; 19^2=361; 19^3=6859; 11936168591 is prime.
lim = 60; Table[SelectFirst[Rest@ FoldList[FromDigits@ Join[Most@ IntegerDigits@ #1, IntegerDigits[n^#2], {1}] &, 11, Range@ lim], PrimeQ], {n, 2, 20}] /. k_ /; MissingQ@ k -> 0 (* Michael De Vlieger, Jan 25 2016, Version 10.2 *)
Comments