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.
%I A084714 #5 Mar 16 2015 22:33:43 %S A084714 0,7,3,5,7,14639,11,13,24137567,17,19, %T A084714 480250763996501976790165756943039,23,727,839,29,31,1223,1367,37, %U A084714 2825759,41,43,2207,47,45767944570399,7890479,53,1176246293903439667999,12117359,59,61,318644812890623 %N A084714 a(n) = smallest prime of the form (2n-1)^k - 2, or 0 if no such number exists. %t A084714 f[n_] := Block[{k = 1}, While[ !PrimeQ[(2*n - 1)^k - 2], k++ ]; (2*n - 1)^k - 2]; Table[ f[n], {n, 2, 34}] %Y A084714 Cf. A084712, A084713. %K A084714 nonn %O A084714 1,2 %A A084714 _Amarnath Murthy_, Jun 10 2003 %E A084714 Edited, corrected and extended by _Robert G. Wilson v_, Jun 11 2003